home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 2003 May (DVD) / Macworld Resource DVD May 2003.toast / Data / Software / Bonus / Programming / revolutionosx.sit / Revolution 1.1.1 / components / properties palettes / revscriptmenus.rev < prev    next >
MetaCard/Revolution Stack  |  2002-04-05  |  88.1 KB  |  [RSTK/Revo]

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was processed as: MetaCard/Revolution Stack (archive/metaCardStack).
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert MetaCard/Revolution Stack (archive/metaCardStack) magic Unsupported
100% file POSIX shell script executable (binary data) default
99% file a /bin/sh script executable (binary data) default (weak)
98% file data default
75% TrID MetaCard/Revolution stack (old) default
25% TrID Linux/UNIX shell script default
100% siegfried fmt/1918 MetaCard Stack (2.x) default
100% binwalkID Executable script, shebang: "/bin/sh" default (weak)
100% xdgMime application/x-shellscript default (weak)


id metadata
keyvalue
macFileType[RSTK]
macFileCreator[Revo]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 23 21 2f 62 69 6e 2f 73 | 68 0a 23 20 4d 65 74 61 |#!/bin/s|h.# Meta|
|00000010| 43 61 72 64 20 32 2e 34 | 20 73 74 61 63 6b 0a 23 |Card 2.4| stack.#|
|00000020| 20 54 68 65 20 66 6f 6c | 6c 6f 77 69 6e 67 20 69 | The fol|lowing i|
|00000030| 73 20 6e 6f 74 20 41 53 | 43 49 49 20 74 65 78 74 |s not AS|CII text|
|00000040| 2c 0a 23 20 73 6f 20 6e | 6f 77 20 77 6f 75 6c 64 |,.# so n|ow would|
|00000050| 20 62 65 20 61 20 67 6f | 6f 64 20 74 69 6d 65 20 | be a go|od time |
|00000060| 74 6f 20 71 20 6f 75 74 | 20 6f 66 20 6d 6f 72 65 |to q out| of more|
|00000070| 0c 0a 65 78 65 63 20 6d | 63 20 24 30 20 22 24 40 |..exec m|c $0 "$@|
|00000080| 22 0a 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |".......|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00000100| 02 00 00 03 00 00 03 f8 | 00 0f 72 65 76 53 63 72 |........|..revScr|
|00000110| 69 70 74 4d 65 6e 75 73 | 00 01 00 88 00 00 00 00 |iptMenus|........|
|00000120| 00 80 00 00 ea 00 d0 01 | 89 00 34 00 00 00 00 00 |........|..4.....|
|00000130| 00 00 00 00 00 00 00 00 | 20 00 20 ff ff ff ff 00 |........| . .....|
|00000140| 00 00 00 18 00 0c 63 52 | 45 56 47 65 6e 65 72 61 |......cR|EVGenera|
|00000150| 6c 00 00 00 00 05 0a 62 | 6f 6f 6b 6d 61 72 6b 73 |l......b|ookmarks|
|00000160| 00 00 00 0c 68 61 6e 64 | 6c 65 72 4c 69 73 74 00 |....hand|lerList.|
|00000170| 00 00 0b 74 65 6d 70 53 | 63 72 69 70 74 00 00 00 |...tempS|cript...|
|00000180| 0c 70 72 65 76 48 61 6e | 64 6c 65 72 00 00 00 10 |.prevHan|dler....|
|00000190| 73 63 72 69 70 74 53 65 | 6c 65 63 74 69 6f 6e 00 |scriptSe|lection.|
|000001a0| 00 0b 63 68 61 72 20 31 | 20 74 6f 20 30 04 00 00 |..char 1| to 0...|
|000001b0| 03 ea 00 00 00 00 09 40 | 00 00 00 00 80 00 00 00 |.......@|........|
|000001c0| 00 00 01 89 00 34 00 00 | 00 02 0a 63 44 6f 6e 74 |.....4..|...cDont|
|000001d0| 57 72 61 70 00 00 05 66 | 61 6c 73 65 06 63 57 72 |Wrap...f|alse.cWr|
|000001e0| 61 70 00 00 04 74 72 75 | 65 18 00 0c 63 52 45 56 |ap...tru|e...cREV|
|000001f0| 47 65 6e 65 72 61 6c 00 | 00 00 00 05 0a 62 6f 6f |General.|.....boo|
|00000200| 6b 6d 61 72 6b 73 00 00 | 00 0c 68 61 6e 64 6c 65 |kmarks..|..handle|
|00000210| 72 4c 69 73 74 00 00 00 | 0b 74 65 6d 70 53 63 72 |rList...|.tempScr|
|00000220| 69 70 74 00 00 00 0c 70 | 72 65 76 48 61 6e 64 6c |ipt....p|revHandl|
|00000230| 65 72 00 00 00 10 73 63 | 72 69 70 74 53 65 6c 65 |er....sc|riptSele|
|00000240| 63 74 69 6f 6e 00 00 0b | 63 68 61 72 20 31 20 74 |ction...|char 1 t|
|00000250| 6f 20 30 07 00 00 03 f6 | 05 00 00 03 f6 00 0f 72 |o 0.....|.......r|
|00000260| 65 76 53 63 72 69 70 74 | 4d 65 6e 75 73 00 00 00 |evScript|Menus...|
|00000270| e9 10 1f 07 6f 6e 20 6d | 6f 75 73 65 44 6f 77 6e |....on m|ouseDown|
|00000280| 20 20 20 20 20 20 20 20 | 20 20 0a 20 20 67 6c 6f | | . glo|
|00000290| 62 61 6c 20 67 52 45 56 | 54 6f 70 45 64 69 74 6f |bal gREV|TopEdito|
|000002a0| 72 20 20 20 20 20 20 20 | 20 20 20 0a 20 20 67 6c |r | . gl|
|000002b0| 6f 62 61 6c 20 67 52 45 | 56 54 65 78 74 4d 65 6e |obal gRE|VTextMen|
|000002c0| 75 2c 20 67 52 45 56 44 | 69 73 61 62 6c 65 64 54 |u, gREVD|isabledT|
|000002d0| 65 78 74 20 20 20 20 20 | 20 20 20 20 20 0a 20 20 |ext | . |
|000002e0| 6c 6f 63 6b 20 6d 65 6e | 75 73 20 20 20 20 20 20 |lock men|us |
|000002f0| 0a 20 20 73 65 74 20 74 | 68 65 20 64 65 66 61 75 |. set t|he defau|
|00000300| 6c 74 53 74 61 63 6b 20 | 74 6f 20 67 52 45 56 54 |ltStack |to gREVT|
|00000310| 6f 70 45 64 69 74 6f 72 | 0a 20 20 69 66 20 74 68 |opEditor|. if th|
|00000320| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 6c 69 6e 65 |e number| of line|
|00000330| 73 20 69 6e 20 74 68 65 | 20 74 65 78 74 20 6f 66 |s in the| text of|
|00000340| 20 62 74 6e 20 22 48 61 | 6e 64 6c 65 72 73 22 20 | btn "Ha|ndlers" |
|00000350| 3e 20 30 20 74 68 65 6e | 20 73 65 74 20 74 68 65 |> 0 then| set the|
|00000360| 20 74 65 78 74 20 6f 66 | 20 6d 65 6e 75 20 22 48 | text of| menu "H|
|00000370| 61 6e 64 6c 65 72 22 20 | 74 6f 20 74 68 65 20 74 |andler" |to the t|
|00000380| 65 78 74 20 6f 66 20 62 | 74 6e 20 22 48 61 6e 64 |ext of b|tn "Hand|
|00000390| 6c 65 72 73 22 20 65 6c | 73 65 20 73 65 74 20 74 |lers" el|se set t|
|000003a0| 68 65 20 74 65 78 74 20 | 6f 66 20 6d 65 6e 75 20 |he text |of menu |
|000003b0| 22 48 61 6e 64 6c 65 72 | 22 20 74 6f 20 22 28 4e |"Handler|" to "(N|
|000003c0| 6f 20 48 61 6e 64 6c 65 | 72 73 22 0a 20 20 69 66 |o Handle|rs". if|
|000003d0| 20 74 68 65 20 63 43 61 | 73 65 53 65 6e 73 69 74 | the cCa|seSensit|
|000003e0| 69 76 65 20 6f 66 20 74 | 68 69 73 20 63 64 20 74 |ive of t|his cd t|
|000003f0| 68 65 6e 20 68 69 6c 69 | 74 65 20 6d 65 6e 75 49 |hen hili|te menuI|
|00000400| 74 65 6d 20 31 31 20 6f | 66 20 6d 65 6e 75 20 22 |tem 11 o|f menu "|
|00000410| 56 69 65 77 22 20 20 20 | 20 20 20 20 20 20 20 0a |View" | .|
|00000420| 20 20 65 6c 73 65 20 75 | 6e 68 69 6c 69 74 65 20 | else u|nhilite |
|00000430| 6d 65 6e 75 49 74 65 6d | 20 31 31 20 6f 66 20 6d |menuItem| 11 of m|
|00000440| 65 6e 75 20 22 56 69 65 | 77 22 20 20 20 20 20 20 |enu "Vie|w" |
|00000450| 20 20 20 20 0a 20 20 69 | 66 20 74 68 65 20 63 57 | . i|f the cW|
|00000460| 68 6f 6c 65 4d 61 74 63 | 68 65 73 20 6f 66 20 74 |holeMatc|hes of t|
|00000470| 68 69 73 20 63 64 20 74 | 68 65 6e 20 68 69 6c 69 |his cd t|hen hili|
|00000480| 74 65 20 6d 65 6e 75 49 | 74 65 6d 20 31 32 20 6f |te menuI|tem 12 o|
|00000490| 66 20 6d 65 6e 75 20 22 | 56 69 65 77 22 20 20 20 |f menu "|View" |
|000004a0| 20 20 20 20 20 20 20 0a | 20 20 65 6c 73 65 20 75 | .| else u|
|000004b0| 6e 68 69 6c 69 74 65 20 | 6d 65 6e 75 49 74 65 6d |nhilite |menuItem|
|000004c0| 20 31 32 20 6f 66 20 6d | 65 6e 75 20 22 56 69 65 | 12 of m|enu "Vie|
|000004d0| 77 22 20 20 20 20 20 20 | 20 20 20 20 0a 20 20 69 |w" | . i|
|000004e0| 66 20 74 68 65 20 63 53 | 6f 72 74 20 6f 66 20 74 |f the cS|ort of t|
|000004f0| 68 69 73 20 63 64 20 74 | 68 65 6e 20 68 69 6c 69 |his cd t|hen hili|
|00000500| 74 65 20 6d 65 6e 75 49 | 74 65 6d 20 35 20 6f 66 |te menuI|tem 5 of|
|00000510| 20 6d 65 6e 75 20 22 76 | 69 65 77 22 20 65 6c 73 | menu "v|iew" els|
|00000520| 65 20 75 6e 68 69 6c 69 | 74 65 20 6d 65 6e 75 49 |e unhili|te menuI|
|00000530| 74 65 6d 20 35 20 6f 66 | 20 6d 65 6e 75 20 22 76 |tem 5 of| menu "v|
|00000540| 69 65 77 22 20 20 20 20 | 20 20 20 20 20 20 0a 20 |iew" | . |
|00000550| 20 69 66 20 74 68 65 20 | 63 48 61 6e 64 6c 65 72 | if the |cHandler|
|00000560| 4c 69 73 74 20 6f 66 20 | 74 68 69 73 20 63 64 20 |List of |this cd |
|00000570| 74 68 65 6e 20 68 69 6c | 69 74 65 20 6d 65 6e 75 |then hil|ite menu|
|00000580| 49 74 65 6d 20 34 20 6f | 66 20 6d 65 6e 75 20 22 |Item 4 o|f menu "|
|00000590| 76 69 65 77 22 20 65 6c | 73 65 20 75 6e 68 69 6c |view" el|se unhil|
|000005a0| 69 74 65 20 6d 65 6e 75 | 49 74 65 6d 20 34 20 6f |ite menu|Item 4 o|
|000005b0| 66 20 6d 65 6e 75 20 22 | 76 69 65 77 22 20 20 20 |f menu "|view" |
|000005c0| 20 20 20 20 20 20 20 0a | 20 20 69 66 20 74 68 65 | .| if the|
|000005d0| 20 63 53 68 6f 77 41 73 | 48 61 6e 64 6c 65 72 73 | cShowAs|Handlers|
|000005e0| 20 6f 66 20 74 68 69 73 | 20 63 64 20 74 68 65 6e | of this| cd then|
|000005f0| 20 68 69 6c 69 74 65 20 | 6d 65 6e 75 49 74 65 6d | hilite |menuItem|
|00000600| 20 31 20 6f 66 20 6d 65 | 6e 75 20 22 76 69 65 77 | 1 of me|nu "view|
|00000610| 22 20 65 6c 73 65 20 75 | 6e 68 69 6c 69 74 65 20 |" else u|nhilite |
|00000620| 6d 65 6e 75 49 74 65 6d | 20 31 20 6f 66 20 6d 65 |menuItem| 1 of me|
|00000630| 6e 75 20 22 76 69 65 77 | 22 20 20 20 20 20 20 20 |nu "view|" |
|00000640| 20 20 20 0a 20 20 69 66 | 20 74 68 65 20 63 4c 69 | . if| the cLi|
|00000650| 76 65 43 6f 6c 6f 72 20 | 6f 66 20 74 68 69 73 20 |veColor |of this |
|00000660| 63 64 20 74 68 65 6e 20 | 68 69 6c 69 74 65 20 6d |cd then |hilite m|
|00000670| 65 6e 75 49 74 65 6d 20 | 31 34 20 6f 66 20 6d 65 |enuItem |14 of me|
|00000680| 6e 75 20 22 76 69 65 77 | 22 20 65 6c 73 65 20 75 |nu "view|" else u|
|00000690| 6e 68 69 6c 69 74 65 20 | 6d 65 6e 75 49 74 65 6d |nhilite |menuItem|
|000006a0| 20 31 34 20 6f 66 20 6d | 65 6e 75 20 22 76 69 65 | 14 of m|enu "vie|
|000006b0| 77 22 20 20 20 20 20 20 | 20 20 20 20 0a 20 20 69 |w" | . i|
|000006c0| 66 20 74 68 65 20 63 44 | 6f 6e 74 57 72 61 70 20 |f the cD|ontWrap |
|000006d0| 6f 66 20 74 68 69 73 20 | 63 64 20 74 68 65 6e 20 |of this |cd then |
|000006e0| 75 6e 68 69 6c 69 74 65 | 20 6d 65 6e 75 49 74 65 |unhilite| menuIte|
|000006f0| 6d 20 31 37 20 6f 66 20 | 6d 65 6e 75 20 22 76 69 |m 17 of |menu "vi|
|00000700| 65 77 22 20 65 6c 73 65 | 20 68 69 6c 69 74 65 20 |ew" else| hilite |
|00000710| 6d 65 6e 75 49 74 65 6d | 20 31 37 20 6f 66 20 6d |menuItem| 17 of m|
|00000720| 65 6e 75 20 22 76 69 65 | 77 22 20 20 20 20 20 20 |enu "vie|w" |
|00000730| 20 20 20 20 0a 20 20 20 | 0a 20 20 20 0a 20 20 69 | . |. . i|
|00000740| 66 20 74 68 65 20 73 65 | 6c 65 63 74 65 64 46 69 |f the se|lectedFi|
|00000750| 65 6c 64 20 69 73 20 65 | 6d 70 74 79 20 6f 72 20 |eld is e|mpty or |
|00000760| 74 68 65 20 73 68 6f 72 | 74 20 6e 61 6d 65 20 6f |the shor|t name o|
|00000770| 66 20 74 68 65 20 73 65 | 6c 65 63 74 65 64 46 69 |f the se|lectedFi|
|00000780| 65 6c 64 20 69 73 20 6e | 6f 74 20 22 73 63 72 69 |eld is n|ot "scri|
|00000790| 70 74 22 20 74 68 65 6e | 20 20 20 20 20 20 20 20 |pt" then| |
|000007a0| 20 20 0a 20 20 20 20 64 | 69 73 61 62 6c 65 20 6d | . d|isable m|
|000007b0| 65 6e 75 49 74 65 6d 20 | 31 20 6f 66 20 6d 65 6e |enuItem |1 of men|
|000007c0| 75 20 22 62 6f 6f 6b 6d | 61 72 6b 73 22 0a 20 20 |u "bookm|arks". |
|000007d0| 20 20 64 69 73 61 62 6c | 65 20 6d 65 6e 75 49 74 | disabl|e menuIt|
|000007e0| 65 6d 20 31 20 6f 66 20 | 6d 65 6e 75 20 22 56 69 |em 1 of |menu "Vi|
|000007f0| 65 77 22 0a 20 20 65 6c | 73 65 0a 20 20 20 20 65 |ew". el|se. e|
|00000800| 6e 61 62 6c 65 20 6d 65 | 6e 75 49 74 65 6d 20 31 |nable me|nuItem 1|
|00000810| 20 6f 66 20 6d 65 6e 75 | 20 22 56 69 65 77 22 0a | of menu| "View".|
|00000820| 20 20 20 20 65 6e 61 62 | 6c 65 20 6d 65 6e 75 49 | enab|le menuI|
|00000830| 74 65 6d 20 31 20 6f 66 | 20 6d 65 6e 75 20 22 62 |tem 1 of| menu "b|
|00000840| 6f 6f 6b 6d 61 72 6b 73 | 22 0a 20 20 65 6e 64 20 |ookmarks|". end |
|00000850| 69 66 20 20 20 20 20 20 | 20 20 20 20 0a 20 20 70 |if | . p|
|00000860| 75 74 20 74 68 65 20 74 | 65 78 74 20 6f 66 20 6d |ut the t|ext of m|
|00000870| 65 6e 75 20 22 45 64 69 | 74 22 20 69 6e 74 6f 20 |enu "Edi|t" into |
|00000880| 74 45 64 69 74 20 20 20 | 20 20 20 20 20 20 20 0a |tEdit | .|
|00000890| 20 20 2d 2d 74 65 78 74 | 20 74 61 6b 65 73 20 70 | --text| takes p|
|000008a0| 72 69 6f 72 69 74 79 20 | 6f 76 65 72 20 6f 62 6a |riority |over obj|
|000008b0| 65 63 74 73 20 62 65 63 | 61 75 73 65 20 69 66 20 |ects bec|ause if |
|000008c0| 62 6f 74 68 2c 20 69 74 | 20 6d 65 61 6e 73 20 61 |both, it| means a|
|000008d0| 6e 20 61 63 74 69 76 65 | 20 74 65 78 74 20 73 65 |n active| text se|
|000008e0| 6c 65 63 74 69 6f 6e 20 | 69 6e 20 70 61 6c 65 74 |lection |in palet|
|000008f0| 74 65 20 20 20 20 20 20 | 20 20 20 20 0a 20 20 69 |te | . i|
|00000900| 66 20 28 74 68 65 20 73 | 65 6c 4f 62 6a 29 20 69 |f (the s|elObj) i|
|00000910| 73 20 65 6d 70 74 79 20 | 74 68 65 6e 20 70 75 74 |s empty |then put|
|00000920| 20 66 61 6c 73 65 20 69 | 6e 74 6f 20 74 4f 62 6a | false i|nto tObj|
|00000930| 65 63 74 73 53 65 6c 65 | 63 74 65 64 20 20 20 20 |ectsSele|cted |
|00000940| 20 20 20 20 20 20 0a 20 | 20 65 6c 73 65 20 70 75 | . | else pu|
|00000950| 74 20 74 72 75 65 20 69 | 6e 74 6f 20 74 4f 62 6a |t true i|nto tObj|
|00000960| 65 63 74 73 53 65 6c 65 | 63 74 65 64 20 20 20 20 |ectsSele|cted |
|00000970| 20 20 20 20 20 20 0a 20 | 20 69 66 20 28 74 68 65 | . | if (the|
|00000980| 20 73 65 6c 65 63 74 65 | 64 54 65 78 74 29 20 69 | selecte|dText) i|
|00000990| 73 20 65 6d 70 74 79 20 | 74 68 65 6e 20 70 75 74 |s empty |then put|
|000009a0| 20 66 61 6c 73 65 20 69 | 6e 74 6f 20 74 54 65 78 | false i|nto tTex|
|000009b0| 74 53 65 6c 65 63 74 65 | 64 20 20 20 20 20 20 20 |tSelecte|d |
|000009c0| 20 20 20 0a 20 20 65 6c | 73 65 20 70 75 74 20 74 | . el|se put t|
|000009d0| 72 75 65 20 69 6e 74 6f | 20 74 54 65 78 74 53 65 |rue into| tTextSe|
|000009e0| 6c 65 63 74 65 64 20 20 | 20 20 20 20 20 20 20 20 |lected | |
|000009f0| 0a 20 20 73 77 69 74 63 | 68 20 74 54 65 78 74 53 |. switc|h tTextS|
|00000a00| 65 6c 65 63 74 65 64 20 | 20 20 20 20 20 20 20 20 |elected | |
|00000a10| 20 0a 20 20 63 61 73 65 | 20 74 72 75 65 20 20 20 | . case| true |
|00000a20| 20 20 20 20 20 20 20 0a | 20 20 20 20 2d 2d 74 65 | .| --te|
|00000a30| 78 74 20 69 73 20 73 65 | 6c 65 63 74 65 64 20 20 |xt is se|lected |
|00000a40| 20 20 20 20 20 20 20 20 | 0a 20 20 20 20 70 75 74 | |. put|
|00000a50| 20 22 43 75 26 74 20 54 | 65 78 74 2f 58 22 20 26 | "Cu&t T|ext/X" &|
|00000a60| 20 63 72 20 26 20 22 26 | 43 6f 70 79 20 54 65 78 | cr & "&|Copy Tex|
|00000a70| 74 2f 43 22 20 69 6e 74 | 6f 20 6c 69 6e 65 20 33 |t/C" int|o line 3|
|00000a80| 20 74 6f 20 34 20 6f 66 | 20 74 45 64 69 74 20 20 | to 4 of| tEdit |
|00000a90| 20 20 20 20 20 20 20 20 | 0a 20 20 20 20 70 75 74 | |. put|
|00000aa0| 20 22 43 6c 65 61 26 72 | 20 54 65 78 74 22 20 69 | "Clea&r| Text" i|
|00000ab0| 6e 74 6f 20 6c 69 6e 65 | 20 38 20 6f 66 20 74 45 |nto line| 8 of tE|
|00000ac0| 64 69 74 20 20 20 20 20 | 20 20 20 20 20 0a 20 20 |dit | . |
|00000ad0| 20 20 62 72 65 61 6b 20 | 20 20 20 20 20 20 20 20 | break | |
|00000ae0| 20 0a 20 20 63 61 73 65 | 20 66 61 6c 73 65 20 20 | . case| false |
|00000af0| 20 20 20 20 20 20 20 20 | 0a 20 20 20 20 73 77 69 | |. swi|
|00000b00| 74 63 68 20 74 4f 62 6a | 65 63 74 73 53 65 6c 65 |tch tObj|ectsSele|
|00000b10| 63 74 65 64 20 20 20 20 | 20 20 20 20 20 20 0a 20 |cted | . |
|00000b20| 20 20 20 63 61 73 65 20 | 74 72 75 65 20 20 20 20 | case |true |
|00000b30| 20 20 20 20 20 20 0a 20 | 20 20 20 20 20 2d 2d 6e | . | --n|
|00000b40| 6f 20 74 65 78 74 2c 20 | 6f 62 6a 65 63 74 73 20 |o text, |objects |
|00000b50| 20 20 20 20 20 20 20 20 | 20 0a 20 20 20 20 20 20 | | . |
|00000b60| 70 75 74 20 22 43 75 26 | 74 20 4f 62 6a 65 63 74 |put "Cu&|t Object|
|00000b70| 73 2f 58 22 20 26 20 63 | 72 20 26 20 22 26 43 6f |s/X" & c|r & "&Co|
|00000b80| 70 79 20 4f 62 6a 65 63 | 74 73 2f 43 22 20 69 6e |py Objec|ts/C" in|
|00000b90| 74 6f 20 6c 69 6e 65 20 | 33 20 74 6f 20 34 20 6f |to line |3 to 4 o|
|00000ba0| 66 20 74 45 64 69 74 20 | 20 20 20 20 20 20 20 20 |f tEdit | |
|00000bb0| 20 0a 20 20 20 20 20 20 | 70 75 74 20 22 43 6c 65 | . |put "Cle|
|00000bc0| 61 26 72 20 4f 62 6a 65 | 63 74 73 22 20 69 6e 74 |a&r Obje|cts" int|
|00000bd0| 6f 20 6c 69 6e 65 20 38 | 20 6f 66 20 74 45 64 69 |o line 8| of tEdi|
|00000be0| 74 20 20 20 20 20 20 20 | 20 20 20 0a 20 20 20 20 |t | . |
|00000bf0| 20 20 62 72 65 61 6b 20 | 20 20 20 20 20 20 20 20 | break | |
|00000c00| 20 0a 20 20 20 20 63 61 | 73 65 20 66 61 6c 73 65 | . ca|se false|
|00000c10| 20 20 20 20 20 20 20 20 | 20 20 0a 20 20 20 20 20 | | . |
|00000c20| 20 2d 2d 6e 6f 20 74 65 | 78 74 2c 20 6e 6f 20 6f | --no te|xt, no o|
|00000c30| 62 6a 65 63 74 73 20 20 | 20 20 20 20 20 20 20 20 |bjects | |
|00000c40| 0a 20 20 20 20 20 20 2d | 2d 64 69 73 61 62 6c 65 |. -|-disable|
|00000c50| 20 65 64 69 74 20 63 75 | 74 2c 20 63 6f 70 79 2c | edit cu|t, copy,|
|00000c60| 20 63 6c 65 61 72 20 20 | 20 20 20 20 20 20 20 20 | clear | |
|00000c70| 0a 20 20 20 20 20 20 70 | 75 74 20 22 28 43 75 26 |. p|ut "(Cu&|
|00000c80| 74 2f 58 22 20 26 20 63 | 72 20 26 20 22 28 26 43 |t/X" & c|r & "(&C|
|00000c90| 6f 70 79 2f 43 22 20 69 | 6e 74 6f 20 6c 69 6e 65 |opy/C" i|nto line|
|00000ca0| 20 33 20 74 6f 20 34 20 | 6f 66 20 74 45 64 69 74 | 3 to 4 |of tEdit|
|00000cb0| 20 20 20 20 20 20 20 20 | 20 20 0a 20 20 20 20 20 | | . |
|00000cc0| 20 70 75 74 20 20 22 28 | 43 6c 65 61 26 72 22 20 | put "(|Clea&r" |
|00000cd0| 69 6e 74 6f 20 6c 69 6e | 65 20 38 20 6f 66 20 74 |into lin|e 8 of t|
|00000ce0| 45 64 69 74 20 20 20 20 | 20 20 20 20 20 20 0a 20 |Edit | . |
|00000cf0| 20 20 20 20 20 62 72 65 | 61 6b 20 20 20 20 20 20 | bre|ak |
|00000d00| 20 20 20 20 0a 20 20 20 | 20 65 6e 64 20 73 77 69 | . | end swi|
|00000d10| 74 63 68 20 20 20 20 20 | 20 20 20 20 20 0a 20 20 |tch | . |
|00000d20| 20 20 62 72 65 61 6b 20 | 20 20 20 20 20 20 20 20 | break | |
|00000d30| 20 0a 20 20 65 6e 64 20 | 73 77 69 74 63 68 20 20 | . end |switch |
|00000d40| 20 20 20 20 20 20 20 20 | 0a 20 20 2d 2d 70 61 73 | |. --pas|
|00000d50| 74 65 20 20 20 20 20 20 | 20 20 20 20 0a 20 20 69 |te | . i|
|00000d60| 66 20 74 68 65 20 63 6c | 69 70 42 6f 61 72 64 20 |f the cl|ipBoard |
|00000d70| 69 73 20 22 65 6d 70 74 | 79 22 20 6f 72 20 28 74 |is "empt|y" or (t|
|00000d80| 68 65 20 63 6c 69 70 62 | 6f 61 72 64 20 69 73 20 |he clipb|oard is |
|00000d90| 22 74 65 78 74 22 20 61 | 6e 64 20 74 68 65 20 73 |"text" a|nd the s|
|00000da0| 65 6c 65 63 74 65 64 46 | 69 65 6c 64 20 69 73 20 |electedF|ield is |
|00000db0| 65 6d 70 74 79 29 20 74 | 68 65 6e 20 20 20 20 20 |empty) t|hen |
|00000dc0| 20 20 20 20 20 0a 20 20 | 20 20 70 75 74 20 22 26 | . | put "&|
|00000dd0| 50 61 73 74 65 2f 56 22 | 20 69 6e 74 6f 20 6c 69 |Paste/V"| into li|
|00000de0| 6e 65 20 35 20 6f 66 20 | 74 45 64 69 74 20 20 20 |ne 5 of |tEdit |
|00000df0| 20 20 20 20 20 20 20 0a | 20 20 65 6c 73 65 20 69 | .| else i|
|00000e00| 66 20 74 68 65 20 63 6c | 69 70 62 6f 61 72 64 20 |f the cl|ipboard |
|00000e10| 69 73 20 22 74 65 78 74 | 22 20 61 6e 64 20 74 68 |is "text|" and th|
|00000e20| 65 20 73 65 6c 65 63 74 | 65 64 46 69 65 6c 64 20 |e select|edField |
|00000e30| 69 73 20 6e 6f 74 20 65 | 6d 70 74 79 20 74 68 65 |is not e|mpty the|
|00000e40| 6e 20 20 20 20 20 20 20 | 20 20 20 0a 20 20 20 20 |n | . |
|00000e50| 70 75 74 20 22 26 50 61 | 73 74 65 20 54 65 78 74 |put "&Pa|ste Text|
|00000e60| 2f 56 22 20 69 6e 74 6f | 20 6c 69 6e 65 20 35 20 |/V" into| line 5 |
|00000e70| 6f 66 20 74 45 64 69 74 | 20 20 20 20 20 20 20 20 |of tEdit| |
|00000e80| 20 20 0a 20 20 65 6c 73 | 65 20 69 66 20 74 68 65 | . els|e if the|
|00000e90| 20 63 6c 69 70 62 6f 61 | 72 64 20 69 73 20 22 6f | clipboa|rd is "o|
|00000ea0| 62 6a 65 63 74 73 22 20 | 74 68 65 6e 20 20 20 20 |bjects" |then |
|00000eb0| 20 20 20 20 20 20 0a 20 | 20 20 20 70 75 74 20 22 | . | put "|
|00000ec0| 26 50 61 73 74 65 20 4f | 62 6a 65 63 74 73 2f 56 |&Paste O|bjects/V|
|00000ed0| 22 20 69 6e 74 6f 20 6c | 69 6e 65 20 35 20 6f 66 |" into l|ine 5 of|
|00000ee0| 20 74 45 64 69 74 20 20 | 20 20 20 20 20 20 20 20 | tEdit | |
|00000ef0| 0a 20 20 65 6e 64 20 69 | 66 20 20 20 20 20 20 20 |. end i|f |
|00000f00| 20 20 20 0a 20 20 73 65 | 74 20 74 68 65 20 74 65 | . se|t the te|
|00000f10| 78 74 20 6f 66 20 6d 65 | 6e 75 20 22 45 64 69 74 |xt of me|nu "Edit|
|00000f20| 22 20 74 6f 20 74 45 64 | 69 74 20 20 20 20 20 20 |" to tEd|it |
|00000f30| 20 20 20 20 0a 20 20 2d | 2d 74 65 78 74 20 6d 65 | . -|-text me|
|00000f40| 6e 75 20 20 20 20 20 20 | 20 20 20 20 0a 20 20 69 |nu | . i|
|00000f50| 66 20 6e 6f 74 20 74 54 | 65 78 74 53 65 6c 65 63 |f not tT|extSelec|
|00000f60| 74 65 64 20 61 6e 64 20 | 6e 6f 74 20 74 4f 62 6a |ted and |not tObj|
|00000f70| 65 63 74 73 53 65 6c 65 | 63 74 65 64 20 74 68 65 |ectsSele|cted the|
|00000f80| 6e 20 20 20 20 20 20 20 | 20 20 20 0a 20 20 20 20 |n | . |
|00000f90| 69 66 20 74 68 65 20 70 | 6c 61 74 66 6f 72 6d 20 |if the p|latform |
|00000fa0| 69 73 20 22 4d 61 63 4f | 53 22 20 74 68 65 6e 20 |is "MacO|S" then |
|00000fb0| 64 69 73 61 62 6c 65 20 | 6d 65 6e 75 20 22 74 65 |disable |menu "te|
|00000fc0| 78 74 22 20 20 20 20 20 | 20 20 20 20 20 0a 20 20 |xt" | . |
|00000fd0| 20 20 65 6c 73 65 20 73 | 65 74 20 74 68 65 20 74 | else s|et the t|
|00000fe0| 65 78 74 20 6f 66 20 6d | 65 6e 75 20 22 54 65 78 |ext of m|enu "Tex|
|00000ff0| 74 22 20 74 6f 20 67 52 | 45 56 44 69 73 61 62 6c |t" to gR|EVDisabl|
|00001000| 65 64 54 65 78 74 20 20 | 20 20 20 20 20 20 20 20 |edText | |
|00001010| 0a 20 20 65 6c 73 65 20 | 20 20 20 20 20 20 20 20 |. else | |
|00001020| 20 0a 20 20 20 20 69 66 | 20 74 68 65 20 70 6c 61 | . if| the pla|
|00001030| 74 66 6f 72 6d 20 69 73 | 20 22 4d 61 63 4f 53 22 |tform is| "MacOS"|
|00001040| 20 74 68 65 6e 20 65 6e | 61 62 6c 65 20 6d 65 6e | then en|able men|
|00001050| 75 20 22 74 65 78 74 22 | 20 20 20 20 20 20 20 20 |u "text"| |
|00001060| 20 20 0a 20 20 20 20 65 | 6c 73 65 20 73 65 74 20 | . e|lse set |
|00001070| 74 68 65 20 74 65 78 74 | 20 6f 66 20 6d 65 6e 75 |the text| of menu|
|00001080| 20 22 54 65 78 74 22 20 | 74 6f 20 67 52 45 56 54 | "Text" |to gREVT|
|00001090| 65 78 74 4d 65 6e 75 20 | 20 20 20 20 20 20 20 20 |extMenu | |
|000010a0| 20 0a 20 20 20 20 70 75 | 74 20 67 52 45 56 54 65 | . pu|t gREVTe|
|000010b0| 78 74 4d 65 6e 75 20 69 | 6e 74 6f 20 74 54 65 78 |xtMenu i|nto tTex|
|000010c0| 74 20 20 20 20 20 20 20 | 20 20 20 0a 20 20 20 20 |t | . |
|000010d0| 69 66 20 74 68 65 20 73 | 65 6c 65 63 74 65 64 43 |if the s|electedC|
|000010e0| 68 75 6e 6b 20 69 73 20 | 65 6d 70 74 79 20 74 68 |hunk is |empty th|
|000010f0| 65 6e 20 20 20 20 20 20 | 20 20 20 20 0a 20 20 20 |en | . |
|00001100| 20 20 20 2d 2d 73 65 6c | 65 63 74 65 64 20 6f 62 | --sel|ected ob|
|00001110| 6a 65 63 74 20 20 20 20 | 20 20 20 20 20 20 0a 20 |ject | . |
|00001120| 20 20 20 20 20 70 75 74 | 20 74 68 65 20 74 65 78 | put| the tex|
|00001130| 74 46 6f 6e 74 20 6f 66 | 20 74 68 65 20 73 65 6c |tFont of| the sel|
|00001140| 65 63 74 65 64 4f 62 6a | 65 63 74 20 69 6e 74 6f |ectedObj|ect into|
|00001150| 20 74 46 6f 6e 74 20 20 | 20 20 20 20 20 20 20 20 | tFont | |
|00001160| 0a 20 20 20 20 20 20 70 | 75 74 20 74 68 65 20 74 |. p|ut the t|
|00001170| 65 78 74 53 69 7a 65 20 | 6f 66 20 74 68 65 20 73 |extSize |of the s|
|00001180| 65 6c 65 63 74 65 64 4f | 62 6a 65 63 74 20 69 6e |electedO|bject in|
|00001190| 74 6f 20 74 53 69 7a 65 | 20 20 20 20 20 20 20 20 |to tSize| |
|000011a0| 20 20 0a 20 20 20 20 20 | 20 70 75 74 20 74 68 65 | . | put the|
|000011b0| 20 74 65 78 74 53 74 79 | 6c 65 20 6f 66 20 74 68 | textSty|le of th|
|000011c0| 65 20 73 65 6c 65 63 74 | 65 64 4f 62 6a 65 63 74 |e select|edObject|
|000011d0| 20 69 6e 74 6f 20 74 53 | 74 79 6c 65 20 20 20 20 | into tS|tyle |
|000011e0| 20 20 20 20 20 20 0a 20 | 20 20 20 20 20 70 75 74 | . | put|
|000011f0| 20 74 68 65 20 74 65 78 | 74 43 6f 6c 6f 72 20 6f | the tex|tColor o|
|00001200| 66 20 74 68 65 20 73 65 | 6c 65 63 74 65 64 4f 62 |f the se|lectedOb|
|00001210| 6a 65 63 74 20 69 6e 74 | 6f 20 74 43 6f 6c 6f 72 |ject int|o tColor|
|00001220| 20 20 20 20 20 20 20 20 | 20 20 0a 20 20 20 20 20 | | . |
|00001230| 20 70 75 74 20 74 68 65 | 20 74 65 78 74 41 6c 69 | put the| textAli|
|00001240| 67 6e 20 6f 66 20 74 68 | 65 20 73 65 6c 65 63 74 |gn of th|e select|
|00001250| 65 64 4f 62 6a 65 63 74 | 20 69 6e 74 6f 20 74 41 |edObject| into tA|
|00001260| 6c 69 67 6e 20 20 20 20 | 20 20 20 20 20 20 0a 20 |lign | . |
|00001270| 20 20 20 20 20 69 66 20 | 74 68 65 20 6e 75 6d 62 | if |the numb|
|00001280| 65 72 20 6f 66 20 6c 69 | 6e 65 73 20 69 6e 20 28 |er of li|nes in (|
|00001290| 74 68 65 20 73 65 6c 4f | 62 6a 29 20 3e 20 31 20 |the selO|bj) > 1 |
|000012a0| 74 68 65 6e 20 20 20 20 | 20 20 20 20 20 20 0a 20 |then | . |
|000012b0| 20 20 20 20 20 20 20 72 | 65 70 65 61 74 20 66 6f | r|epeat fo|
|000012c0| 72 20 65 61 63 68 20 6c | 69 6e 65 20 6c 20 69 6e |r each l|ine l in|
|000012d0| 20 28 74 68 65 20 73 65 | 6c 4f 62 6a 29 20 20 20 | (the se|lObj) |
|000012e0| 20 20 20 20 20 20 20 0a | 20 20 20 20 20 20 20 20 | .| |
|000012f0| 20 20 69 66 20 74 68 65 | 20 74 65 78 74 46 6f 6e | if the| textFon|
|00001300| 74 20 6f 66 20 6c 20 69 | 73 20 6e 6f 74 20 74 46 |t of l i|s not tF|
|00001310| 6f 6e 74 20 74 68 65 6e | 20 70 75 74 20 22 4d 55 |ont then| put "MU|
|00001320| 4c 54 49 50 4c 45 22 20 | 69 6e 74 6f 20 74 46 6f |LTIPLE" |into tFo|
|00001330| 6e 74 20 20 20 20 20 20 | 20 20 20 20 0a 20 20 20 |nt | . |
|00001340| 20 20 20 20 20 20 20 69 | 66 20 74 68 65 20 74 65 | i|f the te|
|00001350| 78 74 53 69 7a 65 20 6f | 66 20 6c 20 69 73 20 6e |xtSize o|f l is n|
|00001360| 6f 74 20 74 53 69 7a 65 | 20 74 68 65 6e 20 70 75 |ot tSize| then pu|
|00001370| 74 20 22 4d 55 4c 54 49 | 50 4c 45 22 20 69 6e 74 |t "MULTI|PLE" int|
|00001380| 6f 20 74 53 69 7a 65 20 | 20 20 20 20 20 20 20 20 |o tSize | |
|00001390| 20 0a 20 20 20 20 20 20 | 20 20 20 20 69 66 20 74 | . | if t|
|000013a0| 68 65 20 74 65 78 74 53 | 74 79 6c 65 20 6f 66 20 |he textS|tyle of |
|000013b0| 6c 20 69 73 20 6e 6f 74 | 20 74 53 74 79 6c 65 20 |l is not| tStyle |
|000013c0| 74 68 65 6e 20 70 75 74 | 20 22 4d 55 4c 54 49 50 |then put| "MULTIP|
|000013d0| 4c 45 22 20 69 6e 74 6f | 20 74 53 74 79 6c 65 20 |LE" into| tStyle |
|000013e0| 20 20 20 20 20 20 20 20 | 20 0a 20 20 20 20 20 20 | | . |
|000013f0| 20 20 20 20 69 66 20 74 | 68 65 20 74 65 78 74 43 | if t|he textC|
|00001400| 6f 6c 6f 72 20 6f 66 20 | 6c 20 69 73 20 6e 6f 74 |olor of |l is not|
|00001410| 20 74 43 6f 6c 6f 72 20 | 74 68 65 6e 20 70 75 74 | tColor |then put|
|00001420| 20 22 4d 55 4c 54 49 50 | 4c 45 22 20 69 6e 74 6f | "MULTIP|LE" into|
|00001430| 20 74 43 6f 6c 6f 72 20 | 20 20 20 20 20 20 20 20 | tColor | |
|00001440| 20 0a 20 20 20 20 20 20 | 20 20 20 20 69 66 20 74 | . | if t|
|00001450| 68 65 20 74 65 78 74 41 | 6c 69 67 6e 20 6f 66 20 |he textA|lign of |
|00001460| 6c 20 69 73 20 6e 6f 74 | 20 74 41 6c 69 67 6e 20 |l is not| tAlign |
|00001470| 74 68 65 6e 20 70 75 74 | 20 65 6d 70 74 79 20 69 |then put| empty i|
|00001480| 6e 74 6f 20 74 41 6c 69 | 67 6e 20 20 20 20 20 20 |nto tAli|gn |
|00001490| 20 20 20 20 0a 20 20 20 | 20 20 20 20 20 65 6e 64 | . | end|
|000014a0| 20 72 65 70 65 61 74 20 | 20 20 20 20 20 20 20 20 | repeat | |
|000014b0| 20 0a 20 20 20 20 20 20 | 65 6e 64 20 69 66 20 20 | . |end if |
|000014c0| 20 20 20 20 20 20 20 20 | 0a 20 20 20 20 65 6c 73 | |. els|
|000014d0| 65 20 20 20 20 20 20 20 | 20 20 20 0a 20 20 20 20 |e | . |
|000014e0| 20 20 2d 2d 73 65 6c 65 | 63 74 65 64 20 74 65 78 | --sele|cted tex|
|000014f0| 74 20 20 20 20 20 20 20 | 20 20 20 0a 20 20 20 20 |t | . |
|00001500| 20 20 67 6c 6f 62 61 6c | 20 67 52 45 56 54 6f 70 | global| gREVTop|
|00001510| 45 64 69 74 6f 72 20 20 | 20 20 20 20 20 20 20 20 |Editor | |
|00001520| 0a 20 20 20 20 20 20 73 | 65 74 20 74 68 65 20 64 |. s|et the d|
|00001530| 65 66 61 75 6c 74 53 74 | 61 63 6b 20 74 6f 20 67 |efaultSt|ack to g|
|00001540| 52 45 56 54 6f 70 45 64 | 69 74 6f 72 20 20 20 20 |REVTopEd|itor |
|00001550| 20 20 20 20 20 20 0a 20 | 20 20 20 20 20 70 75 74 | . | put|
|00001560| 20 74 68 65 20 65 66 66 | 65 63 74 69 76 65 20 74 | the eff|ective t|
|00001570| 65 78 74 46 6f 6e 74 20 | 6f 66 20 74 68 65 20 73 |extFont |of the s|
|00001580| 65 6c 65 63 74 65 64 43 | 68 75 6e 6b 20 69 6e 74 |electedC|hunk int|
|00001590| 6f 20 74 46 6f 6e 74 20 | 20 20 20 20 20 20 20 20 |o tFont | |
|000015a0| 20 0a 20 20 20 20 20 20 | 70 75 74 20 74 68 65 20 | . |put the |
|000015b0| 65 66 66 65 63 74 69 76 | 65 20 74 65 78 74 53 69 |effectiv|e textSi|
|000015c0| 7a 65 20 6f 66 20 74 68 | 65 20 73 65 6c 65 63 74 |ze of th|e select|
|000015d0| 65 64 43 68 75 6e 6b 20 | 69 6e 74 6f 20 74 53 69 |edChunk |into tSi|
|000015e0| 7a 65 20 20 20 20 20 20 | 20 20 20 20 0a 20 20 20 |ze | . |
|000015f0| 20 20 20 70 75 74 20 74 | 68 65 20 74 65 78 74 53 | put t|he textS|
|00001600| 74 79 6c 65 20 6f 66 20 | 74 68 65 20 73 65 6c 65 |tyle of |the sele|
|00001610| 63 74 65 64 43 68 75 6e | 6b 20 69 6e 74 6f 20 74 |ctedChun|k into t|
|00001620| 53 74 79 6c 65 20 20 20 | 20 20 20 20 20 20 20 0a |Style | .|
|00001630| 20 20 20 20 20 20 70 75 | 74 20 74 68 65 20 74 65 | pu|t the te|
|00001640| 78 74 53 68 69 66 74 20 | 6f 66 20 74 68 65 20 73 |xtShift |of the s|
|00001650| 65 6c 65 63 74 65 64 43 | 68 75 6e 6b 20 69 6e 74 |electedC|hunk int|
|00001660| 6f 20 74 53 68 69 66 74 | 20 20 20 20 20 20 20 20 |o tShift| |
|00001670| 20 20 0a 20 20 20 20 20 | 20 70 75 74 20 74 68 65 | . | put the|
|00001680| 20 65 66 66 65 63 74 69 | 76 65 20 74 65 78 74 43 | effecti|ve textC|
|00001690| 6f 6c 6f 72 20 6f 66 20 | 74 68 65 20 73 65 6c 65 |olor of |the sele|
|000016a0| 63 74 65 64 43 68 75 6e | 6b 20 69 6e 74 6f 20 74 |ctedChun|k into t|
|000016b0| 43 6f 6c 6f 72 20 20 20 | 20 20 20 20 20 20 20 0a |Color | .|
|000016c0| 20 20 20 20 20 20 2d 2d | 74 65 78 74 20 73 68 69 | --|text shi|
|000016d0| 66 74 20 20 20 20 20 20 | 20 20 20 20 0a 20 20 20 |ft | . |
|000016e0| 20 20 20 69 66 20 74 53 | 68 69 66 74 20 69 73 20 | if tS|hift is |
|000016f0| 65 6d 70 74 79 20 74 68 | 65 6e 20 70 75 74 20 30 |empty th|en put 0|
|00001700| 20 69 6e 74 6f 20 74 53 | 68 69 66 74 20 20 20 20 | into tS|hift |
|00001710| 20 20 20 20 20 20 0a 20 | 20 20 20 20 20 69 66 20 | . | if |
|00001720| 74 53 68 69 66 74 20 3c | 20 30 20 74 68 65 6e 20 |tShift <| 0 then |
|00001730| 70 75 74 20 22 21 72 53 | 75 62 73 63 72 69 70 74 |put "!rS|ubscript|
|00001740| 22 20 69 6e 74 6f 20 6c | 69 6e 65 20 31 31 20 6f |" into l|ine 11 o|
|00001750| 66 20 74 54 65 78 74 20 | 20 20 20 20 20 20 20 20 |f tText | |
|00001760| 20 0a 20 20 20 20 20 20 | 65 6c 73 65 20 70 75 74 | . |else put|
|00001770| 20 22 21 6e 53 75 62 73 | 63 72 69 70 74 22 20 69 | "!nSubs|cript" i|
|00001780| 6e 74 6f 20 6c 69 6e 65 | 20 31 31 20 6f 66 20 74 |nto line| 11 of t|
|00001790| 54 65 78 74 20 20 20 20 | 20 20 20 20 20 20 0a 20 |Text | . |
|000017a0| 20 20 20 20 20 69 66 20 | 74 53 68 69 66 74 20 3e | if |tShift >|
|000017b0| 20 30 20 74 68 65 6e 20 | 70 75 74 20 22 21 72 53 | 0 then |put "!rS|
|000017c0| 75 70 65 72 73 63 72 69 | 70 74 22 20 69 6e 74 6f |uperscri|pt" into|
|000017d0| 20 6c 69 6e 65 20 31 32 | 20 6f 66 20 74 54 65 78 | line 12| of tTex|
|000017e0| 74 20 20 20 20 20 20 20 | 20 20 20 0a 20 20 20 20 |t | . |
|000017f0| 20 20 65 6c 73 65 20 70 | 75 74 20 22 21 6e 53 75 | else p|ut "!nSu|
|00001800| 70 65 72 73 63 72 69 70 | 74 22 20 69 6e 74 6f 20 |perscrip|t" into |
|00001810| 6c 69 6e 65 20 31 32 20 | 6f 66 20 74 54 65 78 74 |line 12 |of tText|
|00001820| 20 20 20 20 20 20 20 20 | 20 20 0a 20 20 20 20 65 | | . e|
|00001830| 6e 64 20 69 66 20 20 20 | 20 20 20 20 20 20 20 0a |nd if | .|
|00001840| 20 20 20 20 2d 2d 66 6f | 6e 74 20 20 20 20 20 20 | --fo|nt |
|00001850| 20 20 20 20 0a 20 20 20 | 20 69 66 20 74 46 6f 6e | . | if tFon|
|00001860| 74 20 69 73 20 65 6d 70 | 74 79 20 74 68 65 6e 20 |t is emp|ty then |
|00001870| 70 75 74 20 22 45 6d 70 | 74 79 22 20 69 6e 74 6f |put "Emp|ty" into|
|00001880| 20 74 46 6f 6e 74 20 20 | 20 20 20 20 20 20 20 20 | tFont | |
|00001890| 0a 20 20 20 20 70 75 74 | 20 6c 69 6e 65 4f 66 66 |. put| lineOff|
|000018a0| 73 65 74 28 74 46 6f 6e | 74 2c 74 54 65 78 74 29 |set(tFon|t,tText)|
|000018b0| 20 69 6e 74 6f 20 74 4c | 69 6e 65 4e 6f 20 20 20 | into tL|ineNo |
|000018c0| 20 20 20 20 20 20 20 0a | 20 20 20 20 69 66 20 74 | .| if t|
|000018d0| 4c 69 6e 65 4e 6f 20 69 | 73 20 6e 6f 74 20 30 20 |LineNo i|s not 0 |
|000018e0| 74 68 65 6e 20 20 20 20 | 20 20 20 20 20 20 0a 20 |then | . |
|000018f0| 20 20 20 20 20 2d 2d 69 | 66 20 69 74 20 69 73 20 | --i|f it is |
|00001900| 30 2c 20 61 75 74 6f 20 | 75 6e 68 69 6c 69 74 69 |0, auto |unhiliti|
|00001910| 6e 67 20 77 69 6c 6c 20 | 6f 63 63 75 72 20 61 73 |ng will |occur as|
|00001920| 20 74 65 78 74 20 69 73 | 20 73 65 74 20 74 6f 20 | text is| set to |
|00001930| 64 65 66 61 75 6c 74 20 | 20 20 20 20 20 20 20 20 |default | |
|00001940| 20 0a 20 20 20 20 20 20 | 70 75 74 20 22 72 22 20 | . |put "r" |
|00001950| 69 6e 74 6f 20 63 68 61 | 72 20 32 20 6f 66 20 6c |into cha|r 2 of l|
|00001960| 69 6e 65 20 74 4c 69 6e | 65 4e 6f 20 6f 66 20 74 |ine tLin|eNo of t|
|00001970| 54 65 78 74 20 20 20 20 | 20 20 20 20 20 20 0a 20 |Text | . |
|00001980| 20 20 20 65 6e 64 20 69 | 66 20 20 20 20 20 20 20 | end i|f |
|00001990| 20 20 20 0a 20 20 20 20 | 2d 2d 73 69 7a 65 20 20 | . |--size |
|000019a0| 20 20 20 20 20 20 20 20 | 0a 20 20 20 20 70 75 74 | |. put|
|000019b0| 20 6c 69 6e 65 4f 66 66 | 73 65 74 28 22 53 69 7a | lineOff|set("Siz|
|000019c0| 65 22 26 63 72 2c 74 54 | 65 78 74 29 20 69 6e 74 |e"&cr,tT|ext) int|
|000019d0| 6f 20 74 53 74 61 72 74 | 4e 75 6d 20 20 20 20 20 |o tStart|Num |
|000019e0| 20 20 20 20 20 0a 20 20 | 20 20 69 66 20 74 53 69 | . | if tSi|
|000019f0| 7a 65 20 69 73 20 65 6d | 70 74 79 20 74 68 65 6e |ze is em|pty then|
|00001a00| 20 70 75 74 20 71 75 6f | 74 65 20 26 20 22 45 6d | put quo|te & "Em|
|00001a10| 70 74 79 22 20 26 20 71 | 75 6f 74 65 20 69 6e 74 |pty" & q|uote int|
|00001a20| 6f 20 74 53 69 7a 65 20 | 20 20 20 20 20 20 20 20 |o tSize | |
|00001a30| 20 0a 20 20 20 20 70 75 | 74 20 6c 69 6e 65 4f 66 | . pu|t lineOf|
|00001a40| 66 73 65 74 28 74 53 69 | 7a 65 2c 74 54 65 78 74 |fset(tSi|ze,tText|
|00001a50| 2c 74 53 74 61 72 74 4e | 75 6d 29 2b 74 53 74 61 |,tStartN|um)+tSta|
|00001a60| 72 74 4e 75 6d 20 69 6e | 74 6f 20 74 4c 69 6e 65 |rtNum in|to tLine|
|00001a70| 4e 6f 20 20 20 20 20 20 | 20 20 20 20 0a 20 20 20 |No | . |
|00001a80| 20 69 66 20 74 4c 69 6e | 65 4e 6f 20 69 73 20 6e | if tLin|eNo is n|
|00001a90| 6f 74 20 30 20 74 68 65 | 6e 20 20 20 20 20 20 20 |ot 0 the|n |
|00001aa0| 20 20 20 0a 20 20 20 20 | 20 20 69 66 20 74 53 69 | . | if tSi|
|00001ab0| 7a 65 20 69 73 20 6e 6f | 74 20 61 6d 6f 6e 67 20 |ze is no|t among |
|00001ac0| 74 68 65 20 69 74 65 6d | 73 20 6f 66 20 22 45 6d |the item|s of "Em|
|00001ad0| 70 74 79 2c 38 2c 39 2c | 31 30 2c 31 32 2c 31 34 |pty,8,9,|10,12,14|
|00001ae0| 2c 31 38 2c 32 34 2c 33 | 36 2c 34 38 2c 4d 75 6c |,18,24,3|6,48,Mul|
|00001af0| 74 69 70 6c 65 22 20 74 | 68 65 6e 20 70 75 74 20 |tiple" t|hen put |
|00001b00| 6c 69 6e 65 4f 66 66 73 | 65 74 28 22 4f 74 68 65 |lineOffs|et("Othe|
|00001b10| 72 2e 2e 2e 22 26 63 72 | 2c 74 54 65 78 74 29 20 |r..."&cr|,tText) |
|00001b20| 69 6e 74 6f 20 74 4c 69 | 6e 65 4e 6f 20 20 20 20 |into tLi|neNo |
|00001b30| 20 20 20 20 20 20 0a 20 | 20 20 20 20 20 70 75 74 | . | put|
|00001b40| 20 22 72 22 20 69 6e 74 | 6f 20 63 68 61 72 20 32 | "r" int|o char 2|
|00001b50| 20 6f 66 20 6c 69 6e 65 | 20 74 4c 69 6e 65 4e 6f | of line| tLineNo|
|00001b60| 20 6f 66 20 74 54 65 78 | 74 20 20 20 20 20 20 20 | of tTex|t |
|00001b70| 20 20 20 0a 20 20 20 20 | 65 6e 64 20 69 66 20 20 | . |end if |
|00001b80| 20 20 20 20 20 20 20 20 | 0a 20 20 20 20 2d 2d 73 | |. --s|
|00001b90| 74 79 6c 65 20 20 20 20 | 20 20 20 20 20 20 0a 20 |tyle | . |
|00001ba0| 20 20 20 72 65 70 6c 61 | 63 65 20 22 74 68 72 65 | repla|ce "thre|
|00001bb0| 65 64 62 6f 78 22 20 77 | 69 74 68 20 22 33 44 20 |edbox" w|ith "3D |
|00001bc0| 42 6f 78 22 20 69 6e 20 | 74 53 74 79 6c 65 20 20 |Box" in |tStyle |
|00001bd0| 20 20 20 20 20 20 20 20 | 0a 20 20 20 20 72 65 70 | |. rep|
|00001be0| 65 61 74 20 66 6f 72 20 | 65 61 63 68 20 69 74 65 |eat for |each ite|
|00001bf0| 6d 20 74 49 74 65 6d 20 | 69 6e 20 74 53 74 79 6c |m tItem |in tStyl|
|00001c00| 65 20 20 20 20 20 20 20 | 20 20 20 0a 20 20 20 20 |e | . |
|00001c10| 20 20 70 75 74 20 6c 69 | 6e 65 4f 66 66 73 65 74 | put li|neOffset|
|00001c20| 28 74 49 74 65 6d 2c 20 | 74 54 65 78 74 29 20 69 |(tItem, |tText) i|
|00001c30| 6e 74 6f 20 74 4c 69 6e | 65 4e 6f 20 20 20 20 20 |nto tLin|eNo |
|00001c40| 20 20 20 20 20 0a 20 20 | 20 20 20 20 69 66 20 74 | . | if t|
|00001c50| 4c 69 6e 65 4e 6f 20 69 | 73 20 6e 6f 74 20 30 20 |LineNo i|s not 0 |
|00001c60| 74 68 65 6e 20 70 75 74 | 20 22 63 22 20 69 6e 74 |then put| "c" int|
|00001c70| 6f 20 63 68 61 72 20 32 | 20 6f 66 20 6c 69 6e 65 |o char 2| of line|
|00001c80| 20 74 4c 69 6e 65 4e 6f | 20 6f 66 20 74 54 65 78 | tLineNo| of tTex|
|00001c90| 74 20 20 20 20 20 20 20 | 20 20 20 0a 20 20 20 20 |t | . |
|00001ca0| 65 6e 64 20 72 65 70 65 | 61 74 20 20 20 20 20 20 |end repe|at |
|00001cb0| 20 20 20 20 0a 20 20 20 | 20 2d 2d 63 6f 6c 6f 72 | . | --color|
|00001cc0| 20 20 20 20 20 20 20 20 | 20 20 0a 20 20 20 20 69 | | . i|
|00001cd0| 66 20 74 43 6f 6c 6f 72 | 20 69 73 20 22 30 2c 30 |f tColor| is "0,0|
|00001ce0| 2c 30 22 20 74 68 65 6e | 20 70 75 74 20 22 42 6c |,0" then| put "Bl|
|00001cf0| 61 63 6b 22 20 69 6e 74 | 6f 20 74 43 6f 6c 6f 72 |ack" int|o tColor|
|00001d00| 20 20 20 20 20 20 20 20 | 20 20 0a 20 20 20 20 69 | | . i|
|00001d10| 66 20 74 43 6f 6c 6f 72 | 20 69 73 20 22 32 35 35 |f tColor| is "255|
|00001d20| 2c 32 35 35 2c 32 35 35 | 22 20 74 68 65 6e 20 70 |,255,255|" then p|
|00001d30| 75 74 20 22 57 68 69 74 | 65 22 20 69 6e 74 6f 20 |ut "Whit|e" into |
|00001d40| 74 43 6f 6c 6f 72 20 20 | 20 20 20 20 20 20 20 20 |tColor | |
|00001d50| 0a 20 20 20 20 69 66 20 | 74 63 6f 6c 6f 72 20 69 |. if |tcolor i|
|00001d60| 73 20 22 32 35 35 2c 30 | 2c 30 22 20 74 68 65 6e |s "255,0|,0" then|
|00001d70| 20 70 75 74 20 22 52 65 | 64 22 20 69 6e 74 6f 20 | put "Re|d" into |
|00001d80| 74 43 6f 6c 6f 72 20 20 | 20 20 20 20 20 20 20 20 |tColor | |
|00001d90| 0a 20 20 20 20 69 66 20 | 74 43 6f 6c 6f 72 20 69 |. if |tColor i|
|00001da0| 73 20 22 30 2c 32 35 35 | 2c 30 22 20 74 68 65 6e |s "0,255|,0" then|
|00001db0| 20 70 75 74 20 22 47 72 | 65 65 6e 22 20 69 6e 74 | put "Gr|een" int|
|00001dc0| 6f 20 74 43 6f 6c 6f 72 | 20 20 20 20 20 20 20 20 |o tColor| |
|00001dd0| 20 20 0a 20 20 20 20 69 | 66 20 74 43 6f 6c 6f 72 | . i|f tColor|
|00001de0| 20 69 73 20 22 30 2c 30 | 2c 32 35 35 22 20 74 68 | is "0,0|,255" th|
|00001df0| 65 6e 20 70 75 74 20 22 | 42 6c 75 65 22 20 69 6e |en put "|Blue" in|
|00001e00| 74 6f 20 74 43 6f 6c 6f | 72 20 20 20 20 20 20 20 |to tColo|r |
|00001e10| 20 20 20 0a 20 20 20 20 | 69 66 20 74 43 6f 6c 6f | . |if tColo|
|00001e20| 72 20 69 73 20 22 32 35 | 35 2c 32 35 35 2c 30 22 |r is "25|5,255,0"|
|00001e30| 20 74 68 65 6e 20 70 75 | 74 20 22 59 65 6c 6c 6f | then pu|t "Yello|
|00001e40| 77 22 20 69 6e 74 6f 20 | 74 43 6f 6c 6f 72 20 20 |w" into |tColor |
|00001e50| 20 20 20 20 20 20 20 20 | 0a 20 20 20 20 70 75 74 | |. put|
|00001e60| 20 6c 69 6e 65 4f 66 66 | 73 65 74 28 22 43 6f 6c | lineOff|set("Col|
|00001e70| 6f 72 22 26 63 72 2c 74 | 54 65 78 74 29 20 69 6e |or"&cr,t|Text) in|
|00001e80| 74 6f 20 74 53 74 61 72 | 74 4e 75 6d 20 20 20 20 |to tStar|tNum |
|00001e90| 20 20 20 20 20 20 0a 20 | 20 20 20 69 66 20 74 43 | . | if tC|
|00001ea0| 6f 6c 6f 72 20 69 73 20 | 65 6d 70 74 79 20 74 68 |olor is |empty th|
|00001eb0| 65 6e 20 70 75 74 20 22 | 45 6d 70 74 79 22 20 69 |en put "|Empty" i|
|00001ec0| 6e 74 6f 20 74 43 6f 6c | 6f 72 20 20 20 20 20 20 |nto tCol|or |
|00001ed0| 20 20 20 20 0a 20 20 20 | 20 69 66 20 74 43 6f 6c | . | if tCol|
|00001ee0| 6f 72 20 69 73 20 74 68 | 65 20 70 65 6e 43 6f 6c |or is th|e penCol|
|00001ef0| 6f 72 20 74 68 65 6e 20 | 70 75 74 20 22 70 65 6e |or then |put "pen|
|00001f00| 20 63 6f 6c 6f 72 22 20 | 69 6e 74 6f 20 74 43 6f | color" |into tCo|
|00001f10| 6c 6f 72 20 20 20 20 20 | 20 20 20 20 20 0a 20 20 |lor | . |
|00001f20| 20 20 70 75 74 20 6c 69 | 6e 65 4f 66 66 73 65 74 | put li|neOffset|
|00001f30| 28 74 43 6f 6c 6f 72 2c | 74 54 65 78 74 2c 74 53 |(tColor,|tText,tS|
|00001f40| 74 61 72 74 4e 75 6d 29 | 2b 74 53 74 61 72 74 4e |tartNum)|+tStartN|
|00001f50| 75 6d 20 69 6e 74 6f 20 | 74 4c 69 6e 65 4e 6f 20 |um into |tLineNo |
|00001f60| 20 20 20 20 20 20 20 20 | 20 0a 20 20 20 20 69 66 | | . if|
|00001f70| 20 74 4c 69 6e 65 4e 6f | 20 69 73 20 6e 6f 74 20 | tLineNo| is not |
|00001f80| 30 20 61 6e 64 20 74 4c | 69 6e 65 4e 6f 20 69 73 |0 and tL|ineNo is|
|00001f90| 20 6e 6f 74 20 74 53 74 | 61 72 74 4e 75 6d 20 74 | not tSt|artNum t|
|00001fa0| 68 65 6e 20 20 20 20 20 | 20 20 20 20 20 0a 20 20 |hen | . |
|00001fb0| 20 20 20 20 70 75 74 20 | 22 72 22 20 69 6e 74 6f | put |"r" into|
|00001fc0| 20 63 68 61 72 20 32 20 | 6f 66 20 6c 69 6e 65 20 | char 2 |of line |
|00001fd0| 74 4c 69 6e 65 4e 6f 20 | 6f 66 20 74 54 65 78 74 |tLineNo |of tText|
|00001fe0| 20 20 20 20 20 20 20 20 | 20 20 0a 20 20 20 20 65 | | . e|
|00001ff0| 6e 64 20 69 66 20 20 20 | 20 20 20 20 20 20 20 0a |nd if | .|
|00002000| 20 20 20 20 2d 2d 61 6c | 69 67 6e 0a 20 20 20 20 | --al|ign. |
|00002010| 69 66 20 74 41 6c 69 67 | 6e 20 69 73 20 6e 6f 74 |if tAlig|n is not|
|00002020| 20 65 6d 70 74 79 20 74 | 68 65 6e 20 20 20 20 20 | empty t|hen |
|00002030| 20 20 20 20 20 0a 20 20 | 20 20 20 20 70 75 74 20 | . | put |
|00002040| 22 72 22 20 69 6e 74 6f | 20 63 68 61 72 20 33 20 |"r" into| char 3 |
|00002050| 6f 66 20 6c 69 6e 65 20 | 6c 69 6e 65 4f 66 66 73 |of line |lineOffs|
|00002060| 65 74 28 74 41 6c 69 67 | 6e 2c 74 54 65 78 74 29 |et(tAlig|n,tText)|
|00002070| 20 6f 66 20 74 54 65 78 | 74 20 20 20 20 20 20 20 | of tTex|t |
|00002080| 20 20 20 0a 20 20 20 20 | 65 6e 64 20 69 66 20 20 | . |end if |
|00002090| 20 20 20 20 20 20 20 20 | 0a 20 20 20 20 2d 2d 73 | |. --s|
|000020a0| 65 74 20 6d 65 6e 75 20 | 20 20 20 20 20 20 20 20 |et menu | |
|000020b0| 20 0a 20 20 20 20 72 65 | 70 6c 61 63 65 20 22 4f | . re|place "O|
|000020c0| 77 6e 65 72 27 73 22 20 | 77 69 74 68 20 22 44 65 |wner's" |with "De|
|000020d0| 66 61 75 6c 74 22 20 69 | 6e 20 74 54 65 78 74 20 |fault" i|n tText |
|000020e0| 20 20 20 20 20 20 20 20 | 20 0a 20 20 20 20 73 65 | | . se|
|000020f0| 74 20 74 68 65 20 74 65 | 78 74 20 6f 66 20 62 74 |t the te|xt of bt|
|00002100| 6e 20 22 54 65 78 74 22 | 20 6f 66 20 73 74 61 63 |n "Text"| of stac|
|00002110| 6b 20 22 72 65 76 53 63 | 72 69 70 74 4d 65 6e 75 |k "revSc|riptMenu|
|00002120| 73 22 20 74 6f 20 74 54 | 65 78 74 20 20 20 20 20 |s" to tT|ext |
|00002130| 20 20 20 20 20 0a 20 20 | 65 6e 64 20 69 66 20 20 | . |end if |
|00002140| 20 20 20 20 20 20 20 20 | 0a 20 20 75 6e 6c 6f 63 | |. unloc|
|00002150| 6b 20 6d 65 6e 75 73 20 | 20 20 20 20 20 20 20 20 |k menus | |
|00002160| 20 0a 65 6e 64 20 6d 6f | 75 73 65 44 6f 77 6e 20 | .end mo|useDown |
|00002170| 20 20 20 20 20 20 20 20 | 20 0a 00 00 00 00 00 80 | | .......|
|00002180| 00 ff fc ff fb 01 3c 00 | 1c 00 00 00 00 18 00 0c |......<.|........|
|00002190| 63 52 45 56 47 65 6e 65 | 72 61 6c 00 00 00 00 08 |cREVGene|ral.....|
|000021a0| 0f 73 63 72 69 70 74 43 | 68 65 63 6b 73 75 6d 00 |.scriptC|hecksum.|
|000021b0| 00 10 4c 38 65 d8 3e c3 | 35 98 f2 89 20 70 92 c3 |..L8e.>.|5... p..|
|000021c0| ad dc 0a 62 6f 6f 6b 6d | 61 72 6b 73 00 00 00 0c |...bookm|arks....|
|000021d0| 72 65 76 55 6e 69 71 75 | 65 49 44 00 00 0c 39 37 |revUniqu|eID...97|
|000021e0| 31 35 34 30 30 39 32 31 | 39 34 0c 68 61 6e 64 6c |15400921|94.handl|
|000021f0| 65 72 4c 69 73 74 00 00 | 09 6d 6f 75 73 65 44 6f |erList..|.mouseDo|
|00002200| 77 6e 10 73 63 72 69 70 | 74 53 65 6c 65 63 74 69 |wn.scrip|tSelecti|
|00002210| 6f 6e 00 00 0f 63 68 61 | 72 20 34 32 32 20 74 6f |on...cha|r 422 to|
|00002220| 20 34 32 31 0c 70 72 65 | 76 48 61 6e 64 6c 65 72 | 421.pre|vHandler|
|00002230| 00 00 09 6d 6f 75 73 65 | 44 6f 77 6e 0b 74 65 6d |...mouse|Down.tem|
|00002240| 70 53 63 72 69 70 74 00 | 00 00 07 73 63 72 69 70 |pScript.|...scrip|
|00002250| 74 00 23 73 3c 70 3e 6f | 6e 20 6d 6f 75 73 65 44 |t.#s<p>o|n mouseD|
|00002260| 6f 77 6e 20 20 20 20 20 | 20 20 20 20 20 3c 2f 70 |own | </p|
|00002270| 3e 0a 3c 70 3e 20 20 67 | 6c 6f 62 61 6c 20 67 52 |>.<p> g|lobal gR|
|00002280| 45 56 54 6f 70 45 64 69 | 74 6f 72 20 20 20 20 20 |EVTopEdi|tor |
|00002290| 20 20 20 20 20 3c 2f 70 | 3e 0a 3c 70 3e 20 20 67 | </p|>.<p> g|
|000022a0| 6c 6f 62 61 6c 20 67 52 | 45 56 54 65 78 74 4d 65 |lobal gR|EVTextMe|
|000022b0| 6e 75 2c 20 67 52 45 56 | 44 69 73 61 62 6c 65 64 |nu, gREV|Disabled|
|000022c0| 54 65 78 74 20 20 20 20 | 20 20 20 20 20 20 3c 2f |Text | </|
|000022d0| 70 3e 0a 3c 70 3e 20 20 | 6c 6f 63 6b 20 6d 65 6e |p>.<p> |lock men|
|000022e0| 75 73 20 20 20 20 20 20 | 3c 2f 70 3e 0a 3c 70 3e |us |</p>.<p>|
|000022f0| 20 20 73 65 74 20 74 68 | 65 20 64 65 66 61 75 6c | set th|e defaul|
|00002300| 74 53 74 61 63 6b 20 74 | 6f 20 67 52 45 56 54 6f |tStack t|o gREVTo|
|00002310| 70 45 64 69 74 6f 72 3c | 2f 70 3e 0a 3c 70 3e 20 |pEditor<|/p>.<p> |
|00002320| 20 69 66 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f | if the |number o|
|00002330| 66 20 6c 69 6e 65 73 20 | 69 6e 20 74 68 65 20 74 |f lines |in the t|
|00002340| 65 78 74 20 6f 66 20 62 | 74 6e 20 22 48 61 6e 64 |ext of b|tn "Hand|
|00002350| 6c 65 72 73 22 20 26 67 | 74 3b 20 30 20 74 68 65 |lers" &g|t; 0 the|
|00002360| 6e 20 73 65 74 20 74 68 | 65 20 74 65 78 74 20 6f |n set th|e text o|
|00002370| 66 20 6d 65 6e 75 20 22 | 48 61 6e 64 6c 65 72 22 |f menu "|Handler"|
|00002380| 20 74 6f 20 74 68 65 20 | 74 65 78 74 20 6f 66 20 | to the |text of |
|00002390| 62 74 6e 20 22 48 61 6e | 64 6c 65 72 73 22 20 65 |btn "Han|dlers" e|
|000023a0| 6c 73 65 20 73 65 74 20 | 74 68 65 20 74 65 78 74 |lse set |the text|
|000023b0| 20 6f 66 20 6d 65 6e 75 | 20 22 48 61 6e 64 6c 65 | of menu| "Handle|
|000023c0| 72 22 20 74 6f 20 22 28 | 4e 6f 20 48 61 6e 64 6c |r" to "(|No Handl|
|000023d0| 65 72 73 22 3c 2f 70 3e | 0a 3c 70 3e 20 20 69 66 |ers"</p>|.<p> if|
|000023e0| 20 74 68 65 20 63 43 61 | 73 65 53 65 6e 73 69 74 | the cCa|seSensit|
|000023f0| 69 76 65 20 6f 66 20 74 | 68 69 73 20 63 64 20 74 |ive of t|his cd t|
|00002400| 68 65 6e 20 68 69 6c 69 | 74 65 20 6d 65 6e 75 49 |hen hili|te menuI|
|00002410| 74 65 6d 20 31 31 20 6f | 66 20 6d 65 6e 75 20 22 |tem 11 o|f menu "|
|00002420| 56 69 65 77 22 20 20 20 | 20 20 20 20 20 20 20 3c |View" | <|
|00002430| 2f 70 3e 0a 3c 70 3e 20 | 20 65 6c 73 65 20 75 6e |/p>.<p> | else un|
|00002440| 68 69 6c 69 74 65 20 6d | 65 6e 75 49 74 65 6d 20 |hilite m|enuItem |
|00002450| 31 31 20 6f 66 20 6d 65 | 6e 75 20 22 56 69 65 77 |11 of me|nu "View|
|00002460| 22 20 20 20 20 20 20 20 | 20 20 20 3c 2f 70 3e 0a |" | </p>.|
|00002470| 3c 70 3e 20 20 69 66 20 | 74 68 65 20 63 57 68 6f |<p> if |the cWho|
|00002480| 6c 65 4d 61 74 63 68 65 | 73 20 6f 66 20 74 68 69 |leMatche|s of thi|
|00002490| 73 20 63 64 20 74 68 65 | 6e 20 68 69 6c 69 74 65 |s cd the|n hilite|
|000024a0| 20 6d 65 6e 75 49 74 65 | 6d 20 31 32 20 6f 66 20 | menuIte|m 12 of |
|000024b0| 6d 65 6e 75 20 22 56 69 | 65 77 22 20 20 20 20 20 |menu "Vi|ew" |
|000024c0| 20 20 20 20 20 3c 2f 70 | 3e 0a 3c 70 3e 20 20 65 | </p|>.<p> e|
|000024d0| 6c 73 65 20 75 6e 68 69 | 6c 69 74 65 20 6d 65 6e |lse unhi|lite men|
|000024e0| 75 49 74 65 6d 20 31 32 | 20 6f 66 20 6d 65 6e 75 |uItem 12| of menu|
|000024f0| 20 22 56 69 65 77 22 20 | 20 20 20 20 20 20 20 20 | "View" | |
|00002500| 20 3c 2f 70 3e 0a 3c 70 | 3e 20 20 69 66 20 74 68 | </p>.<p|> if th|
|00002510| 65 20 63 53 6f 72 74 20 | 6f 66 20 74 68 69 73 20 |e cSort |of this |
|00002520| 63 64 20 74 68 65 6e 20 | 68 69 6c 69 74 65 20 6d |cd then |hilite m|
|00002530| 65 6e 75 49 74 65 6d 20 | 35 20 6f 66 20 6d 65 6e |enuItem |5 of men|
|00002540| 75 20 22 76 69 65 77 22 | 20 65 6c 73 65 20 75 6e |u "view"| else un|
|00002550| 68 69 6c 69 74 65 20 6d | 65 6e 75 49 74 65 6d 20 |hilite m|enuItem |
|00002560| 35 20 6f 66 20 6d 65 6e | 75 20 22 76 69 65 77 22 |5 of men|u "view"|
|00002570| 20 20 20 20 20 20 20 20 | 20 20 3c 2f 70 3e 0a 3c | | </p>.<|
|00002580| 70 3e 20 20 69 66 20 74 | 68 65 20 63 48 61 6e 64 |p> if t|he cHand|
|00002590| 6c 65 72 4c 69 73 74 20 | 6f 66 20 74 68 69 73 20 |lerList |of this |
|000025a0| 63 64 20 74 68 65 6e 20 | 68 69 6c 69 74 65 20 6d |cd then |hilite m|
|000025b0| 65 6e 75 49 74 65 6d 20 | 34 20 6f 66 20 6d 65 6e |enuItem |4 of men|
|000025c0| 75 20 22 76 69 65 77 22 | 20 65 6c 73 65 20 75 6e |u "view"| else un|
|000025d0| 68 69 6c 69 74 65 20 6d | 65 6e 75 49 74 65 6d 20 |hilite m|enuItem |
|000025e0| 34 20 6f 66 20 6d 65 6e | 75 20 22 76 69 65 77 22 |4 of men|u "view"|
|000025f0| 20 20 20 20 20 20 20 20 | 20 20 3c 2f 70 3e 0a 3c | | </p>.<|
|00002600| 70 3e 20 20 69 66 20 74 | 68 65 20 63 53 68 6f 77 |p> if t|he cShow|
|00002610| 41 73 48 61 6e 64 6c 65 | 72 73 20 6f 66 20 74 68 |AsHandle|rs of th|
|00002620| 69 73 20 63 64 20 74 68 | 65 6e 20 68 69 6c 69 74 |is cd th|en hilit|
|00002630| 65 20 6d 65 6e 75 49 74 | 65 6d 20 31 20 6f 66 20 |e menuIt|em 1 of |
|00002640| 6d 65 6e 75 20 22 76 69 | 65 77 22 20 65 6c 73 65 |menu "vi|ew" else|
|00002650| 20 75 6e 68 69 6c 69 74 | 65 20 6d 65 6e 75 49 74 | unhilit|e menuIt|
|00002660| 65 6d 20 31 20 6f 66 20 | 6d 65 6e 75 20 22 76 69 |em 1 of |menu "vi|
|00002670| 65 77 22 20 20 20 20 20 | 20 20 20 20 20 3c 2f 70 |ew" | </p|
|00002680| 3e 0a 3c 70 3e 20 20 69 | 66 20 74 68 65 20 63 4c |>.<p> i|f the cL|
|00002690| 69 76 65 43 6f 6c 6f 72 | 20 6f 66 20 74 68 69 73 |iveColor| of this|
|000026a0| 20 63 64 20 74 68 65 6e | 20 68 69 6c 69 74 65 20 | cd then| hilite |
|000026b0| 6d 65 6e 75 49 74 65 6d | 20 31 34 20 6f 66 20 6d |menuItem| 14 of m|
|000026c0| 65 6e 75 20 22 76 69 65 | 77 22 20 65 6c 73 65 20 |enu "vie|w" else |
|000026d0| 75 6e 68 69 6c 69 74 65 | 20 6d 65 6e 75 49 74 65 |unhilite| menuIte|
|000026e0| 6d 20 31 34 20 6f 66 20 | 6d 65 6e 75 20 22 76 69 |m 14 of |menu "vi|
|000026f0| 65 77 22 20 20 20 20 20 | 20 20 20 20 20 3c 2f 70 |ew" | </p|
|00002700| 3e 0a 3c 70 3e 20 20 69 | 66 20 74 68 65 20 63 44 |>.<p> i|f the cD|
|00002710| 6f 6e 74 57 72 61 70 20 | 6f 66 20 74 68 69 73 20 |ontWrap |of this |
|00002720| 63 64 20 74 68 65 6e 20 | 75 6e 68 69 6c 69 74 65 |cd then |unhilite|
|00002730| 20 6d 65 6e 75 49 74 65 | 6d 20 31 37 20 6f 66 20 | menuIte|m 17 of |
|00002740| 6d 65 6e 75 20 22 76 69 | 65 77 22 20 65 6c 73 65 |menu "vi|ew" else|
|00002750| 20 68 69 6c 69 74 65 20 | 6d 65 6e 75 49 74 65 6d | hilite |menuItem|
|00002760| 20 31 37 20 6f 66 20 6d | 65 6e 75 20 22 76 69 65 | 17 of m|enu "vie|
|00002770| 77 22 20 20 20 20 20 20 | 20 20 20 20 3c 2f 70 3e |w" | </p>|
|00002780| 0a 3c 70 3e 20 20 20 3c | 2f 70 3e 0a 3c 70 3e 20 |.<p> <|/p>.<p> |
|00002790| 20 20 3c 2f 70 3e 0a 3c | 70 3e 20 20 69 66 20 74 | </p>.<|p> if t|
|000027a0| 68 65 20 73 65 6c 65 63 | 74 65 64 46 69 65 6c 64 |he selec|tedField|
|000027b0| 20 69 73 20 65 6d 70 74 | 79 20 6f 72 20 74 68 65 | is empt|y or the|
|000027c0| 20 73 68 6f 72 74 20 6e | 61 6d 65 20 6f 66 20 74 | short n|ame of t|
|000027d0| 68 65 20 73 65 6c 65 63 | 74 65 64 46 69 65 6c 64 |he selec|tedField|
|000027e0| 20 69 73 20 6e 6f 74 20 | 22 73 63 72 69 70 74 22 | is not |"script"|
|000027f0| 20 74 68 65 6e 20 20 20 | 20 20 20 20 20 20 20 3c | then | <|
|00002800| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 64 69 73 61 62 |/p>.<p> | disab|
|00002810| 6c 65 20 6d 65 6e 75 49 | 74 65 6d 20 31 20 6f 66 |le menuI|tem 1 of|
|00002820| 20 6d 65 6e 75 20 22 62 | 6f 6f 6b 6d 61 72 6b 73 | menu "b|ookmarks|
|00002830| 22 3c 2f 70 3e 0a 3c 70 | 3e 20 20 20 20 64 69 73 |"</p>.<p|> dis|
|00002840| 61 62 6c 65 20 6d 65 6e | 75 49 74 65 6d 20 31 20 |able men|uItem 1 |
|00002850| 6f 66 20 6d 65 6e 75 20 | 22 56 69 65 77 22 3c 2f |of menu |"View"</|
|00002860| 70 3e 0a 3c 70 3e 20 20 | 65 6c 73 65 3c 2f 70 3e |p>.<p> |else</p>|
|00002870| 0a 3c 70 3e 20 20 20 20 | 65 6e 61 62 6c 65 20 6d |.<p> |enable m|
|00002880| 65 6e 75 49 74 65 6d 20 | 31 20 6f 66 20 6d 65 6e |enuItem |1 of men|
|00002890| 75 20 22 56 69 65 77 22 | 3c 2f 70 3e 0a 3c 70 3e |u "View"|</p>.<p>|
|000028a0| 20 20 20 20 65 6e 61 62 | 6c 65 20 6d 65 6e 75 49 | enab|le menuI|
|000028b0| 74 65 6d 20 31 20 6f 66 | 20 6d 65 6e 75 20 22 62 |tem 1 of| menu "b|
|000028c0| 6f 6f 6b 6d 61 72 6b 73 | 22 3c 2f 70 3e 0a 3c 70 |ookmarks|"</p>.<p|
|000028d0| 3e 20 20 65 6e 64 20 69 | 66 20 20 20 20 20 20 20 |> end i|f |
|000028e0| 20 20 20 3c 2f 70 3e 0a | 3c 70 3e 20 20 70 75 74 | </p>.|<p> put|
|000028f0| 20 74 68 65 20 74 65 78 | 74 20 6f 66 20 6d 65 6e | the tex|t of men|
|00002900| 75 20 22 45 64 69 74 22 | 20 69 6e 74 6f 20 74 45 |u "Edit"| into tE|
|00002910| 64 69 74 20 20 20 20 20 | 20 20 20 20 20 3c 2f 70 |dit | </p|
|00002920| 3e 0a 3c 70 3e 20 20 2d | 2d 74 65 78 74 20 74 61 |>.<p> -|-text ta|
|00002930| 6b 65 73 20 70 72 69 6f | 72 69 74 79 20 6f 76 65 |kes prio|rity ove|
|00002940| 72 20 6f 62 6a 65 63 74 | 73 20 62 65 63 61 75 73 |r object|s becaus|
|00002950| 65 20 69 66 20 62 6f 74 | 68 2c 20 69 74 20 6d 65 |e if bot|h, it me|
|00002960| 61 6e 73 20 61 6e 20 61 | 63 74 69 76 65 20 74 65 |ans an a|ctive te|
|00002970| 78 74 20 73 65 6c 65 63 | 74 69 6f 6e 20 69 6e 20 |xt selec|tion in |
|00002980| 70 61 6c 65 74 74 65 20 | 20 20 20 20 20 20 20 20 |palette | |
|00002990| 20 3c 2f 70 3e 0a 3c 70 | 3e 20 20 69 66 20 28 74 | </p>.<p|> if (t|
|000029a0| 68 65 20 73 65 6c 4f 62 | 6a 29 20 69 73 20 65 6d |he selOb|j) is em|
|000029b0| 70 74 79 20 74 68 65 6e | 20 70 75 74 20 66 61 6c |pty then| put fal|
|000029c0| 73 65 20 69 6e 74 6f 20 | 74 4f 62 6a 65 63 74 73 |se into |tObjects|
|000029d0| 53 65 6c 65 63 74 65 64 | 20 20 20 20 20 20 20 20 |Selected| |
|000029e0| 20 20 3c 2f 70 3e 0a 3c | 70 3e 20 20 65 6c 73 65 | </p>.<|p> else|
|000029f0| 20 70 75 74 20 74 72 75 | 65 20 69 6e 74 6f 20 74 | put tru|e into t|
|00002a00| 4f 62 6a 65 63 74 73 53 | 65 6c 65 63 74 65 64 20 |ObjectsS|elected |
|00002a10| 20 20 20 20 20 20 20 20 | 20 3c 2f 70 3e 0a 3c 70 | | </p>.<p|
|00002a20| 3e 20 20 69 66 20 28 74 | 68 65 20 73 65 6c 65 63 |> if (t|he selec|
|00002a30| 74 65 64 54 65 78 74 29 | 20 69 73 20 65 6d 70 74 |tedText)| is empt|
|00002a40| 79 20 74 68 65 6e 20 70 | 75 74 20 66 61 6c 73 65 |y then p|ut false|
|00002a50| 20 69 6e 74 6f 20 74 54 | 65 78 74 53 65 6c 65 63 | into tT|extSelec|
|00002a60| 74 65 64 20 20 20 20 20 | 20 20 20 20 20 3c 2f 70 |ted | </p|
|00002a70| 3e 0a 3c 70 3e 20 20 65 | 6c 73 65 20 70 75 74 20 |>.<p> e|lse put |
|00002a80| 74 72 75 65 20 69 6e 74 | 6f 20 74 54 65 78 74 53 |true int|o tTextS|
|00002a90| 65 6c 65 63 74 65 64 20 | 20 20 20 20 20 20 20 20 |elected | |
|00002aa0| 20 3c 2f 70 3e 0a 3c 70 | 3e 20 20 73 77 69 74 63 | </p>.<p|> switc|
|00002ab0| 68 20 74 54 65 78 74 53 | 65 6c 65 63 74 65 64 20 |h tTextS|elected |
|00002ac0| 20 20 20 20 20 20 20 20 | 20 3c 2f 70 3e 0a 3c 70 | | </p>.<p|
|00002ad0| 3e 20 20 63 61 73 65 20 | 74 72 75 65 20 20 20 20 |> case |true |
|00002ae0| 20 20 20 20 20 20 3c 2f | 70 3e 0a 3c 70 3e 20 20 | </|p>.<p> |
|00002af0| 20 20 2d 2d 74 65 78 74 | 20 69 73 20 73 65 6c 65 | --text| is sele|
|00002b00| 63 74 65 64 20 20 20 20 | 20 20 20 20 20 20 3c 2f |cted | </|
|00002b10| 70 3e 0a 3c 70 3e 20 20 | 20 20 70 75 74 20 22 43 |p>.<p> | put "C|
|00002b20| 75 26 61 6d 70 3b 74 20 | 54 65 78 74 2f 58 22 20 |u&amp;t |Text/X" |
|00002b30| 26 61 6d 70 3b 20 63 72 | 20 26 61 6d 70 3b 20 22 |&amp; cr| &amp; "|
|00002b40| 26 61 6d 70 3b 43 6f 70 | 79 20 54 65 78 74 2f 43 |&amp;Cop|y Text/C|
|00002b50| 22 20 69 6e 74 6f 20 6c | 69 6e 65 20 33 20 74 6f |" into l|ine 3 to|
|00002b60| 20 34 20 6f 66 20 74 45 | 64 69 74 20 20 20 20 20 | 4 of tE|dit |
|00002b70| 20 20 20 20 20 3c 2f 70 | 3e 0a 3c 70 3e 20 20 20 | </p|>.<p> |
|00002b80| 20 70 75 74 20 22 43 6c | 65 61 26 61 6d 70 3b 72 | put "Cl|ea&amp;r|
|00002b90| 20 54 65 78 74 22 20 69 | 6e 74 6f 20 6c 69 6e 65 | Text" i|nto line|
|00002ba0| 20 38 20 6f 66 20 74 45 | 64 69 74 20 20 20 20 20 | 8 of tE|dit |
|00002bb0| 20 20 20 20 20 3c 2f 70 | 3e 0a 3c 70 3e 20 20 20 | </p|>.<p> |
|00002bc0| 20 62 72 65 61 6b 20 20 | 20 20 20 20 20 20 20 20 | break | |
|00002bd0| 3c 2f 70 3e 0a 3c 70 3e | 20 20 63 61 73 65 20 66 |</p>.<p>| case f|
|00002be0| 61 6c 73 65 20 20 20 20 | 20 20 20 20 20 20 3c 2f |alse | </|
|00002bf0| 70 3e 0a 3c 70 3e 20 20 | 20 20 73 77 69 74 63 68 |p>.<p> | switch|
|00002c00| 20 74 4f 62 6a 65 63 74 | 73 53 65 6c 65 63 74 65 | tObject|sSelecte|
|00002c10| 64 20 20 20 20 20 20 20 | 20 20 20 3c 2f 70 3e 0a |d | </p>.|
|00002c20| 3c 70 3e 20 20 20 20 63 | 61 73 65 20 74 72 75 65 |<p> c|ase true|
|00002c30| 20 20 20 20 20 20 20 20 | 20 20 3c 2f 70 3e 0a 3c | | </p>.<|
|00002c40| 70 3e 20 20 20 20 20 20 | 2d 2d 6e 6f 20 74 65 78 |p> |--no tex|
|00002c50| 74 2c 20 6f 62 6a 65 63 | 74 73 20 20 20 20 20 20 |t, objec|ts |
|00002c60| 20 20 20 20 3c 2f 70 3e | 0a 3c 70 3e 20 20 20 20 | </p>|.<p> |
|00002c70| 20 20 70 75 74 20 22 43 | 75 26 61 6d 70 3b 74 20 | put "C|u&amp;t |
|00002c80| 4f 62 6a 65 63 74 73 2f | 58 22 20 26 61 6d 70 3b |Objects/|X" &amp;|
|00002c90| 20 63 72 20 26 61 6d 70 | 3b 20 22 26 61 6d 70 3b | cr &amp|; "&amp;|
|00002ca0| 43 6f 70 79 20 4f 62 6a | 65 63 74 73 2f 43 22 20 |Copy Obj|ects/C" |
|00002cb0| 69 6e 74 6f 20 6c 69 6e | 65 20 33 20 74 6f 20 34 |into lin|e 3 to 4|
|00002cc0| 20 6f 66 20 74 45 64 69 | 74 20 20 20 20 20 20 20 | of tEdi|t |
|00002cd0| 20 20 20 3c 2f 70 3e 0a | 3c 70 3e 20 20 20 20 20 | </p>.|<p> |
|00002ce0| 20 70 75 74 20 22 43 6c | 65 61 26 61 6d 70 3b 72 | put "Cl|ea&amp;r|
|00002cf0| 20 4f 62 6a 65 63 74 73 | 22 20 69 6e 74 6f 20 6c | Objects|" into l|
|00002d00| 69 6e 65 20 38 20 6f 66 | 20 74 45 64 69 74 20 20 |ine 8 of| tEdit |
|00002d10| 20 20 20 20 20 20 20 20 | 3c 2f 70 3e 0a 3c 70 3e | |</p>.<p>|
|00002d20| 20 20 20 20 20 20 62 72 | 65 61 6b 20 20 20 20 20 | br|eak |
|00002d30| 20 20 20 20 20 3c 2f 70 | 3e 0a 3c 70 3e 20 20 20 | </p|>.<p> |
|00002d40| 20 63 61 73 65 20 66 61 | 6c 73 65 20 20 20 20 20 | case fa|lse |
|00002d50| 20 20 20 20 20 3c 2f 70 | 3e 0a 3c 70 3e 20 20 20 | </p|>.<p> |
|00002d60| 20 20 20 2d 2d 6e 6f 20 | 74 65 78 74 2c 20 6e 6f | --no |text, no|
|00002d70| 20 6f 62 6a 65 63 74 73 | 20 20 20 20 20 20 20 20 | objects| |
|00002d80| 20 20 3c 2f 70 3e 0a 3c | 70 3e 20 20 20 20 20 20 | </p>.<|p> |
|00002d90| 2d 2d 64 69 73 61 62 6c | 65 20 65 64 69 74 20 63 |--disabl|e edit c|
|00002da0| 75 74 2c 20 63 6f 70 79 | 2c 20 63 6c 65 61 72 20 |ut, copy|, clear |
|00002db0| 20 20 20 20 20 20 20 20 | 20 3c 2f 70 3e 0a 3c 70 | | </p>.<p|
|00002dc0| 3e 20 20 20 20 20 20 70 | 75 74 20 22 28 43 75 26 |> p|ut "(Cu&|
|00002dd0| 61 6d 70 3b 74 2f 58 22 | 20 26 61 6d 70 3b 20 63 |amp;t/X"| &amp; c|
|00002de0| 72 20 26 61 6d 70 3b 20 | 22 28 26 61 6d 70 3b 43 |r &amp; |"(&amp;C|
|00002df0| 6f 70 79 2f 43 22 20 69 | 6e 74 6f 20 6c 69 6e 65 |opy/C" i|nto line|
|00002e00| 20 33 20 74 6f 20 34 20 | 6f 66 20 74 45 64 69 74 | 3 to 4 |of tEdit|
|00002e10| 20 20 20 20 20 20 20 20 | 20 20 3c 2f 70 3e 0a 3c | | </p>.<|
|00002e20| 70 3e 20 20 20 20 20 20 | 70 75 74 20 20 22 28 43 |p> |put "(C|
|00002e30| 6c 65 61 26 61 6d 70 3b | 72 22 20 69 6e 74 6f 20 |lea&amp;|r" into |
|00002e40| 6c 69 6e 65 20 38 20 6f | 66 20 74 45 64 69 74 20 |line 8 o|f tEdit |
|00002e50| 20 20 20 20 20 20 20 20 | 20 3c 2f 70 3e 0a 3c 70 | | </p>.<p|
|00002e60| 3e 20 20 20 20 20 20 62 | 72 65 61 6b 20 20 20 20 |> b|reak |
|00002e70| 20 20 20 20 20 20 3c 2f | 70 3e 0a 3c 70 3e 20 20 | </|p>.<p> |
|00002e80| 20 20 65 6e 64 20 73 77 | 69 74 63 68 20 20 20 20 | end sw|itch |
|00002e90| 20 20 20 20 20 20 3c 2f | 70 3e 0a 3c 70 3e 20 20 | </|p>.<p> |
|00002ea0| 20 20 62 72 65 61 6b 20 | 20 20 20 20 20 20 20 20 | break | |
|00002eb0| 20 3c 2f 70 3e 0a 3c 70 | 3e 20 20 65 6e 64 20 73 | </p>.<p|> end s|
|00002ec0| 77 69 74 63 68 20 20 20 | 20 20 20 20 20 20 20 3c |witch | <|
|00002ed0| 2f 70 3e 0a 3c 70 3e 20 | 20 2d 2d 70 61 73 74 65 |/p>.<p> | --paste|
|00002ee0| 20 20 20 20 20 20 20 20 | 20 20 3c 2f 70 3e 0a 3c | | </p>.<|
|00002ef0| 70 3e 20 20 69 66 20 74 | 68 65 20 63 6c 69 70 42 |p> if t|he clipB|
|00002f00| 6f 61 72 64 20 69 73 20 | 22 65 6d 70 74 79 22 20 |oard is |"empty" |
|00002f10| 6f 72 20 28 74 68 65 20 | 63 6c 69 70 62 6f 61 72 |or (the |clipboar|
|00002f20| 64 20 69 73 20 22 74 65 | 78 74 22 20 61 6e 64 20 |d is "te|xt" and |
|00002f30| 74 68 65 20 73 65 6c 65 | 63 74 65 64 46 69 65 6c |the sele|ctedFiel|
|00002f40| 64 20 69 73 20 65 6d 70 | 74 79 29 20 74 68 65 6e |d is emp|ty) then|
|00002f50| 20 20 20 20 20 20 20 20 | 20 20 3c 2f 70 3e 0a 3c | | </p>.<|
|00002f60| 70 3e 20 20 20 20 70 75 | 74 20 22 26 61 6d 70 3b |p> pu|t "&amp;|
|00002f70| 50 61 73 74 65 2f 56 22 | 20 69 6e 74 6f 20 6c 69 |Paste/V"| into li|
|00002f80| 6e 65 20 35 20 6f 66 20 | 74 45 64 69 74 20 20 20 |ne 5 of |tEdit |
|00002f90| 20 20 20 20 20 20 20 3c | 2f 70 3e 0a 3c 70 3e 20 | <|/p>.<p> |
|00002fa0| 20 65 6c 73 65 20 69 66 | 20 74 68 65 20 63 6c 69 | else if| the cli|
|00002fb0| 70 62 6f 61 72 64 20 69 | 73 20 22 74 65 78 74 22 |pboard i|s "text"|
|00002fc0| 20 61 6e 64 20 74 68 65 | 20 73 65 6c 65 63 74 65 | and the| selecte|
|00002fd0| 64 46 69 65 6c 64 20 69 | 73 20 6e 6f 74 20 65 6d |dField i|s not em|
|00002fe0| 70 74 79 20 74 68 65 6e | 20 20 20 20 20 20 20 20 |pty then| |
|00002ff0| 20 20 3c 2f 70 3e 0a 3c | 70 3e 20 20 20 20 70 75 | </p>.<|p> pu|
|00003000| 74 20 22 26 61 6d 70 3b | 50 61 73 74 65 20 54 65 |t "&amp;|Paste Te|
|00003010| 78 74 2f 56 22 20 69 6e | 74 6f 20 6c 69 6e 65 20 |xt/V" in|to line |
|00003020| 35 20 6f 66 20 74 45 64 | 69 74 20 20 20 20 20 20 |5 of tEd|it |
|00003030| 20 20 20 20 3c 2f 70 3e | 0a 3c 70 3e 20 20 65 6c | </p>|.<p> el|
|00003040| 73 65 20 69 66 20 74 68 | 65 20 63 6c 69 70 62 6f |se if th|e clipbo|
|00003050| 61 72 64 20 69 73 20 22 | 6f 62 6a 65 63 74 73 22 |ard is "|objects"|
|00003060| 20 74 68 65 6e 20 20 20 | 20 20 20 20 20 20 20 3c | then | <|
|00003070| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 70 75 74 20 22 |/p>.<p> | put "|
|00003080| 26 61 6d 70 3b 50 61 73 | 74 65 20 4f 62 6a 65 63 |&amp;Pas|te Objec|
|00003090| 74 73 2f 56 22 20 69 6e | 74 6f 20 6c 69 6e 65 20 |ts/V" in|to line |
|000030a0| 35 20 6f 66 20 74 45 64 | 69 74 20 20 20 20 20 20 |5 of tEd|it |
|000030b0| 20 20 20 20 3c 2f 70 3e | 0a 3c 70 3e 20 20 65 6e | </p>|.<p> en|
|000030c0| 64 20 69 66 20 20 20 20 | 20 20 20 20 20 20 3c 2f |d if | </|
|000030d0| 70 3e 0a 3c 70 3e 20 20 | 73 65 74 20 74 68 65 20 |p>.<p> |set the |
|000030e0| 74 65 78 74 20 6f 66 20 | 6d 65 6e 75 20 22 45 64 |text of |menu "Ed|
|000030f0| 69 74 22 20 74 6f 20 74 | 45 64 69 74 20 20 20 20 |it" to t|Edit |
|00003100| 20 20 20 20 20 20 3c 2f | 70 3e 0a 3c 70 3e 20 20 | </|p>.<p> |
|00003110| 2d 2d 74 65 78 74 20 6d | 65 6e 75 20 20 20 20 20 |--text m|enu |
|00003120| 20 20 20 20 20 3c 2f 70 | 3e 0a 3c 70 3e 20 20 69 | </p|>.<p> i|
|00003130| 66 20 6e 6f 74 20 74 54 | 65 78 74 53 65 6c 65 63 |f not tT|extSelec|
|00003140| 74 65 64 20 61 6e 64 20 | 6e 6f 74 20 74 4f 62 6a |ted and |not tObj|
|00003150| 65 63 74 73 53 65 6c 65 | 63 74 65 64 20 74 68 65 |ectsSele|cted the|
|00003160| 6e 20 20 20 20 20 20 20 | 20 20 20 3c 2f 70 3e 0a |n | </p>.|
|00003170| 3c 70 3e 20 20 20 20 69 | 66 20 74 68 65 20 70 6c |<p> i|f the pl|
|00003180| 61 74 66 6f 72 6d 20 69 | 73 20 22 4d 61 63 4f 53 |atform i|s "MacOS|
|00003190| 22 20 74 68 65 6e 20 64 | 69 73 61 62 6c 65 20 6d |" then d|isable m|
|000031a0| 65 6e 75 20 22 74 65 78 | 74 22 20 20 20 20 20 20 |enu "tex|t" |
|000031b0| 20 20 20 20 3c 2f 70 3e | 0a 3c 70 3e 20 20 20 20 | </p>|.<p> |
|000031c0| 65 6c 73 65 20 73 65 74 | 20 74 68 65 20 74 65 78 |else set| the tex|
|000031d0| 74 20 6f 66 20 6d 65 6e | 75 20 22 54 65 78 74 22 |t of men|u "Text"|
|000031e0| 20 74 6f 20 67 52 45 56 | 44 69 73 61 62 6c 65 64 | to gREV|Disabled|
|000031f0| 54 65 78 74 20 20 20 20 | 20 20 20 20 20 20 3c 2f |Text | </|
|00003200| 70 3e 0a 3c 70 3e 20 20 | 65 6c 73 65 20 20 20 20 |p>.<p> |else |
|00003210| 20 20 20 20 20 20 3c 2f | 70 3e 0a 3c 70 3e 20 20 | </|p>.<p> |
|00003220| 20 20 69 66 20 74 68 65 | 20 70 6c 61 74 66 6f 72 | if the| platfor|
|00003230| 6d 20 69 73 20 22 4d 61 | 63 4f 53 22 20 74 68 65 |m is "Ma|cOS" the|
|00003240| 6e 20 65 6e 61 62 6c 65 | 20 6d 65 6e 75 20 22 74 |n enable| menu "t|
|00003250| 65 78 74 22 20 20 20 20 | 20 20 20 20 20 20 3c 2f |ext" | </|
|00003260| 70 3e 0a 3c 70 3e 20 20 | 20 20 65 6c 73 65 20 73 |p>.<p> | else s|
|00003270| 65 74 20 74 68 65 20 74 | 65 78 74 20 6f 66 20 6d |et the t|ext of m|
|00003280| 65 6e 75 20 22 54 65 78 | 74 22 20 74 6f 20 67 52 |enu "Tex|t" to gR|
|00003290| 45 56 54 65 78 74 4d 65 | 6e 75 20 20 20 20 20 20 |EVTextMe|nu |
|000032a0| 20 20 20 20 3c 2f 70 3e | 0a 3c 70 3e 20 20 20 20 | </p>|.<p> |
|000032b0| 70 75 74 20 67 52 45 56 | 54 65 78 74 4d 65 6e 75 |put gREV|TextMenu|
|000032c0| 20 69 6e 74 6f 20 74 54 | 65 78 74 20 20 20 20 20 | into tT|ext |
|000032d0| 20 20 20 20 20 3c 2f 70 | 3e 0a 3c 70 3e 20 20 20 | </p|>.<p> |
|000032e0| 20 69 66 20 74 68 65 20 | 73 65 6c 65 63 74 65 64 | if the |selected|
|000032f0| 43 68 75 6e 6b 20 69 73 | 20 65 6d 70 74 79 20 74 |Chunk is| empty t|
|00003300| 68 65 6e 20 20 20 20 20 | 20 20 20 20 20 3c 2f 70 |hen | </p|
|00003310| 3e 0a 3c 70 3e 20 20 20 | 20 20 20 2d 2d 73 65 6c |>.<p> | --sel|
|00003320| 65 63 74 65 64 20 6f 62 | 6a 65 63 74 20 20 20 20 |ected ob|ject |
|00003330| 20 20 20 20 20 20 3c 2f | 70 3e 0a 3c 70 3e 20 20 | </|p>.<p> |
|00003340| 20 20 20 20 70 75 74 20 | 74 68 65 20 74 65 78 74 | put |the text|
|00003350| 46 6f 6e 74 20 6f 66 20 | 74 68 65 20 73 65 6c 65 |Font of |the sele|
|00003360| 63 74 65 64 4f 62 6a 65 | 63 74 20 69 6e 74 6f 20 |ctedObje|ct into |
|00003370| 74 46 6f 6e 74 20 20 20 | 20 20 20 20 20 20 20 3c |tFont | <|
|00003380| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 20 20 70 75 74 |/p>.<p> | put|
|00003390| 20 74 68 65 20 74 65 78 | 74 53 69 7a 65 20 6f 66 | the tex|tSize of|
|000033a0| 20 74 68 65 20 73 65 6c | 65 63 74 65 64 4f 62 6a | the sel|ectedObj|
|000033b0| 65 63 74 20 69 6e 74 6f | 20 74 53 69 7a 65 20 20 |ect into| tSize |
|000033c0| 20 20 20 20 20 20 20 20 | 3c 2f 70 3e 0a 3c 70 3e | |</p>.<p>|
|000033d0| 20 20 20 20 20 20 70 75 | 74 20 74 68 65 20 74 65 | pu|t the te|
|000033e0| 78 74 53 74 79 6c 65 20 | 6f 66 20 74 68 65 20 73 |xtStyle |of the s|
|000033f0| 65 6c 65 63 74 65 64 4f | 62 6a 65 63 74 20 69 6e |electedO|bject in|
|00003400| 74 6f 20 74 53 74 79 6c | 65 20 20 20 20 20 20 20 |to tStyl|e |
|00003410| 20 20 20 3c 2f 70 3e 0a | 3c 70 3e 20 20 20 20 20 | </p>.|<p> |
|00003420| 20 70 75 74 20 74 68 65 | 20 74 65 78 74 43 6f 6c | put the| textCol|
|00003430| 6f 72 20 6f 66 20 74 68 | 65 20 73 65 6c 65 63 74 |or of th|e select|
|00003440| 65 64 4f 62 6a 65 63 74 | 20 69 6e 74 6f 20 74 43 |edObject| into tC|
|00003450| 6f 6c 6f 72 20 20 20 20 | 20 20 20 20 20 20 3c 2f |olor | </|
|00003460| 70 3e 0a 3c 70 3e 20 20 | 20 20 20 20 70 75 74 20 |p>.<p> | put |
|00003470| 74 68 65 20 74 65 78 74 | 41 6c 69 67 6e 20 6f 66 |the text|Align of|
|00003480| 20 74 68 65 20 73 65 6c | 65 63 74 65 64 4f 62 6a | the sel|ectedObj|
|00003490| 65 63 74 20 69 6e 74 6f | 20 74 41 6c 69 67 6e 20 |ect into| tAlign |
|000034a0| 20 20 20 20 20 20 20 20 | 20 3c 2f 70 3e 0a 3c 70 | | </p>.<p|
|000034b0| 3e 20 20 20 20 20 20 69 | 66 20 74 68 65 20 6e 75 |> i|f the nu|
|000034c0| 6d 62 65 72 20 6f 66 20 | 6c 69 6e 65 73 20 69 6e |mber of |lines in|
|000034d0| 20 28 74 68 65 20 73 65 | 6c 4f 62 6a 29 20 26 67 | (the se|lObj) &g|
|000034e0| 74 3b 20 31 20 74 68 65 | 6e 20 20 20 20 20 20 20 |t; 1 the|n |
|000034f0| 20 20 20 3c 2f 70 3e 0a | 3c 70 3e 20 20 20 20 20 | </p>.|<p> |
|00003500| 20 20 20 72 65 70 65 61 | 74 20 66 6f 72 20 65 61 | repea|t for ea|
|00003510| 63 68 20 6c 69 6e 65 20 | 6c 20 69 6e 20 28 74 68 |ch line |l in (th|
|00003520| 65 20 73 65 6c 4f 62 6a | 29 20 20 20 20 20 20 20 |e selObj|) |
|00003530| 20 20 20 3c 2f 70 3e 0a | 3c 70 3e 20 20 20 20 20 | </p>.|<p> |
|00003540| 20 20 20 20 20 69 66 20 | 74 68 65 20 74 65 78 74 | if |the text|
|00003550| 46 6f 6e 74 20 6f 66 20 | 6c 20 69 73 20 6e 6f 74 |Font of |l is not|
|00003560| 20 74 46 6f 6e 74 20 74 | 68 65 6e 20 70 75 74 20 | tFont t|hen put |
|00003570| 22 4d 55 4c 54 49 50 4c | 45 22 20 69 6e 74 6f 20 |"MULTIPL|E" into |
|00003580| 74 46 6f 6e 74 20 20 20 | 20 20 20 20 20 20 20 3c |tFont | <|
|00003590| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 20 20 20 20 20 |/p>.<p> | |
|000035a0| 20 69 66 20 74 68 65 20 | 74 65 78 74 53 69 7a 65 | if the |textSize|
|000035b0| 20 6f 66 20 6c 20 69 73 | 20 6e 6f 74 20 74 53 69 | of l is| not tSi|
|000035c0| 7a 65 20 74 68 65 6e 20 | 70 75 74 20 22 4d 55 4c |ze then |put "MUL|
|000035d0| 54 49 50 4c 45 22 20 69 | 6e 74 6f 20 74 53 69 7a |TIPLE" i|nto tSiz|
|000035e0| 65 20 20 20 20 20 20 20 | 20 20 20 3c 2f 70 3e 0a |e | </p>.|
|000035f0| 3c 70 3e 20 20 20 20 20 | 20 20 20 20 20 69 66 20 |<p> | if |
|00003600| 74 68 65 20 74 65 78 74 | 53 74 79 6c 65 20 6f 66 |the text|Style of|
|00003610| 20 6c 20 69 73 20 6e 6f | 74 20 74 53 74 79 6c 65 | l is no|t tStyle|
|00003620| 20 74 68 65 6e 20 70 75 | 74 20 22 4d 55 4c 54 49 | then pu|t "MULTI|
|00003630| 50 4c 45 22 20 69 6e 74 | 6f 20 74 53 74 79 6c 65 |PLE" int|o tStyle|
|00003640| 20 20 20 20 20 20 20 20 | 20 20 3c 2f 70 3e 0a 3c | | </p>.<|
|00003650| 70 3e 20 20 20 20 20 20 | 20 20 20 20 69 66 20 74 |p> | if t|
|00003660| 68 65 20 74 65 78 74 43 | 6f 6c 6f 72 20 6f 66 20 |he textC|olor of |
|00003670| 6c 20 69 73 20 6e 6f 74 | 20 74 43 6f 6c 6f 72 20 |l is not| tColor |
|00003680| 74 68 65 6e 20 70 75 74 | 20 22 4d 55 4c 54 49 50 |then put| "MULTIP|
|00003690| 4c 45 22 20 69 6e 74 6f | 20 74 43 6f 6c 6f 72 20 |LE" into| tColor |
|000036a0| 20 20 20 20 20 20 20 20 | 20 3c 2f 70 3e 0a 3c 70 | | </p>.<p|
|000036b0| 3e 20 20 20 20 20 20 20 | 20 20 20 69 66 20 74 68 |> | if th|
|000036c0| 65 20 74 65 78 74 41 6c | 69 67 6e 20 6f 66 20 6c |e textAl|ign of l|
|000036d0| 20 69 73 20 6e 6f 74 20 | 74 41 6c 69 67 6e 20 74 | is not |tAlign t|
|000036e0| 68 65 6e 20 70 75 74 20 | 65 6d 70 74 79 20 69 6e |hen put |empty in|
|000036f0| 74 6f 20 74 41 6c 69 67 | 6e 20 20 20 20 20 20 20 |to tAlig|n |
|00003700| 20 20 20 3c 2f 70 3e 0a | 3c 70 3e 20 20 20 20 20 | </p>.|<p> |
|00003710| 20 20 20 65 6e 64 20 72 | 65 70 65 61 74 20 20 20 | end r|epeat |
|00003720| 20 20 20 20 20 20 20 3c | 2f 70 3e 0a 3c 70 3e 20 | <|/p>.<p> |
|00003730| 20 20 20 20 20 65 6e 64 | 20 69 66 20 20 20 20 20 | end| if |
|00003740| 20 20 20 20 20 3c 2f 70 | 3e 0a 3c 70 3e 20 20 20 | </p|>.<p> |
|00003750| 20 65 6c 73 65 20 20 20 | 20 20 20 20 20 20 20 3c | else | <|
|00003760| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 20 20 2d 2d 73 |/p>.<p> | --s|
|00003770| 65 6c 65 63 74 65 64 20 | 74 65 78 74 20 20 20 20 |elected |text |
|00003780| 20 20 20 20 20 20 3c 2f | 70 3e 0a 3c 70 3e 20 20 | </|p>.<p> |
|00003790| 20 20 20 20 67 6c 6f 62 | 61 6c 20 67 52 45 56 54 | glob|al gREVT|
|000037a0| 6f 70 45 64 69 74 6f 72 | 20 20 20 20 20 20 20 20 |opEditor| |
|000037b0| 20 20 3c 2f 70 3e 0a 3c | 70 3e 20 20 20 20 20 20 | </p>.<|p> |
|000037c0| 73 65 74 20 74 68 65 20 | 64 65 66 61 75 6c 74 53 |set the |defaultS|
|000037d0| 74 61 63 6b 20 74 6f 20 | 67 52 45 56 54 6f 70 45 |tack to |gREVTopE|
|000037e0| 64 69 74 6f 72 20 20 20 | 20 20 20 20 20 20 20 3c |ditor | <|
|000037f0| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 20 20 70 75 74 |/p>.<p> | put|
|00003800| 20 74 68 65 20 65 66 66 | 65 63 74 69 76 65 20 74 | the eff|ective t|
|00003810| 65 78 74 46 6f 6e 74 20 | 6f 66 20 74 68 65 20 73 |extFont |of the s|
|00003820| 65 6c 65 63 74 65 64 43 | 68 75 6e 6b 20 69 6e 74 |electedC|hunk int|
|00003830| 6f 20 74 46 6f 6e 74 20 | 20 20 20 20 20 20 20 20 |o tFont | |
|00003840| 20 3c 2f 70 3e 0a 3c 70 | 3e 20 20 20 20 20 20 70 | </p>.<p|> p|
|00003850| 75 74 20 74 68 65 20 65 | 66 66 65 63 74 69 76 65 |ut the e|ffective|
|00003860| 20 74 65 78 74 53 69 7a | 65 20 6f 66 20 74 68 65 | textSiz|e of the|
|00003870| 20 73 65 6c 65 63 74 65 | 64 43 68 75 6e 6b 20 69 | selecte|dChunk i|
|00003880| 6e 74 6f 20 74 53 69 7a | 65 20 20 20 20 20 20 20 |nto tSiz|e |
|00003890| 20 20 20 3c 2f 70 3e 0a | 3c 70 3e 20 20 20 20 20 | </p>.|<p> |
|000038a0| 20 70 75 74 20 74 68 65 | 20 74 65 78 74 53 74 79 | put the| textSty|
|000038b0| 6c 65 20 6f 66 20 74 68 | 65 20 73 65 6c 65 63 74 |le of th|e select|
|000038c0| 65 64 43 68 75 6e 6b 20 | 69 6e 74 6f 20 74 53 74 |edChunk |into tSt|
|000038d0| 79 6c 65 20 20 20 20 20 | 20 20 20 20 20 3c 2f 70 |yle | </p|
|000038e0| 3e 0a 3c 70 3e 20 20 20 | 20 20 20 70 75 74 20 74 |>.<p> | put t|
|000038f0| 68 65 20 74 65 78 74 53 | 68 69 66 74 20 6f 66 20 |he textS|hift of |
|00003900| 74 68 65 20 73 65 6c 65 | 63 74 65 64 43 68 75 6e |the sele|ctedChun|
|00003910| 6b 20 69 6e 74 6f 20 74 | 53 68 69 66 74 20 20 20 |k into t|Shift |
|00003920| 20 20 20 20 20 20 20 3c | 2f 70 3e 0a 3c 70 3e 20 | <|/p>.<p> |
|00003930| 20 20 20 20 20 70 75 74 | 20 74 68 65 20 65 66 66 | put| the eff|
|00003940| 65 63 74 69 76 65 20 74 | 65 78 74 43 6f 6c 6f 72 |ective t|extColor|
|00003950| 20 6f 66 20 74 68 65 20 | 73 65 6c 65 63 74 65 64 | of the |selected|
|00003960| 43 68 75 6e 6b 20 69 6e | 74 6f 20 74 43 6f 6c 6f |Chunk in|to tColo|
|00003970| 72 20 20 20 20 20 20 20 | 20 20 20 3c 2f 70 3e 0a |r | </p>.|
|00003980| 3c 70 3e 20 20 20 20 20 | 20 2d 2d 74 65 78 74 20 |<p> | --text |
|00003990| 73 68 69 66 74 20 20 20 | 20 20 20 20 20 20 20 3c |shift | <|
|000039a0| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 20 20 69 66 20 |/p>.<p> | if |
|000039b0| 74 53 68 69 66 74 20 69 | 73 20 65 6d 70 74 79 20 |tShift i|s empty |
|000039c0| 74 68 65 6e 20 70 75 74 | 20 30 20 69 6e 74 6f 20 |then put| 0 into |
|000039d0| 74 53 68 69 66 74 20 20 | 20 20 20 20 20 20 20 20 |tShift | |
|000039e0| 3c 2f 70 3e 0a 3c 70 3e | 20 20 20 20 20 20 69 66 |</p>.<p>| if|
|000039f0| 20 74 53 68 69 66 74 20 | 26 6c 74 3b 20 30 20 74 | tShift |&lt; 0 t|
|00003a00| 68 65 6e 20 70 75 74 20 | 22 21 72 53 75 62 73 63 |hen put |"!rSubsc|
|00003a10| 72 69 70 74 22 20 69 6e | 74 6f 20 6c 69 6e 65 20 |ript" in|to line |
|00003a20| 31 31 20 6f 66 20 74 54 | 65 78 74 20 20 20 20 20 |11 of tT|ext |
|00003a30| 20 20 20 20 20 3c 2f 70 | 3e 0a 3c 70 3e 20 20 20 | </p|>.<p> |
|00003a40| 20 20 20 65 6c 73 65 20 | 70 75 74 20 22 21 6e 53 | else |put "!nS|
|00003a50| 75 62 73 63 72 69 70 74 | 22 20 69 6e 74 6f 20 6c |ubscript|" into l|
|00003a60| 69 6e 65 20 31 31 20 6f | 66 20 74 54 65 78 74 20 |ine 11 o|f tText |
|00003a70| 20 20 20 20 20 20 20 20 | 20 3c 2f 70 3e 0a 3c 70 | | </p>.<p|
|00003a80| 3e 20 20 20 20 20 20 69 | 66 20 74 53 68 69 66 74 |> i|f tShift|
|00003a90| 20 26 67 74 3b 20 30 20 | 74 68 65 6e 20 70 75 74 | &gt; 0 |then put|
|00003aa0| 20 22 21 72 53 75 70 65 | 72 73 63 72 69 70 74 22 | "!rSupe|rscript"|
|00003ab0| 20 69 6e 74 6f 20 6c 69 | 6e 65 20 31 32 20 6f 66 | into li|ne 12 of|
|00003ac0| 20 74 54 65 78 74 20 20 | 20 20 20 20 20 20 20 20 | tText | |
|00003ad0| 3c 2f 70 3e 0a 3c 70 3e | 20 20 20 20 20 20 65 6c |</p>.<p>| el|
|00003ae0| 73 65 20 70 75 74 20 22 | 21 6e 53 75 70 65 72 73 |se put "|!nSupers|
|00003af0| 63 72 69 70 74 22 20 69 | 6e 74 6f 20 6c 69 6e 65 |cript" i|nto line|
|00003b00| 20 31 32 20 6f 66 20 74 | 54 65 78 74 20 20 20 20 | 12 of t|Text |
|00003b10| 20 20 20 20 20 20 3c 2f | 70 3e 0a 3c 70 3e 20 20 | </|p>.<p> |
|00003b20| 20 20 65 6e 64 20 69 66 | 20 20 20 20 20 20 20 20 | end if| |
|00003b30| 20 20 3c 2f 70 3e 0a 3c | 70 3e 20 20 20 20 2d 2d | </p>.<|p> --|
|00003b40| 66 6f 6e 74 20 20 20 20 | 20 20 20 20 20 20 3c 2f |font | </|
|00003b50| 70 3e 0a 3c 70 3e 20 20 | 20 20 69 66 20 74 46 6f |p>.<p> | if tFo|
|00003b60| 6e 74 20 69 73 20 65 6d | 70 74 79 20 74 68 65 6e |nt is em|pty then|
|00003b70| 20 70 75 74 20 22 45 6d | 70 74 79 22 20 69 6e 74 | put "Em|pty" int|
|00003b80| 6f 20 74 46 6f 6e 74 20 | 20 20 20 20 20 20 20 20 |o tFont | |
|00003b90| 20 3c 2f 70 3e 0a 3c 70 | 3e 20 20 20 20 70 75 74 | </p>.<p|> put|
|00003ba0| 20 6c 69 6e 65 4f 66 66 | 73 65 74 28 74 46 6f 6e | lineOff|set(tFon|
|00003bb0| 74 2c 74 54 65 78 74 29 | 20 69 6e 74 6f 20 74 4c |t,tText)| into tL|
|00003bc0| 69 6e 65 4e 6f 20 20 20 | 20 20 20 20 20 20 20 3c |ineNo | <|
|00003bd0| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 69 66 20 74 4c |/p>.<p> | if tL|
|00003be0| 69 6e 65 4e 6f 20 69 73 | 20 6e 6f 74 20 30 20 74 |ineNo is| not 0 t|
|00003bf0| 68 65 6e 20 20 20 20 20 | 20 20 20 20 20 3c 2f 70 |hen | </p|
|00003c00| 3e 0a 3c 70 3e 20 20 20 | 20 20 20 2d 2d 69 66 20 |>.<p> | --if |
|00003c10| 69 74 20 69 73 20 30 2c | 20 61 75 74 6f 20 75 6e |it is 0,| auto un|
|00003c20| 68 69 6c 69 74 69 6e 67 | 20 77 69 6c 6c 20 6f 63 |hiliting| will oc|
|00003c30| 63 75 72 20 61 73 20 74 | 65 78 74 20 69 73 20 73 |cur as t|ext is s|
|00003c40| 65 74 20 74 6f 20 64 65 | 66 61 75 6c 74 20 20 20 |et to de|fault |
|00003c50| 20 20 20 20 20 20 20 3c | 2f 70 3e 0a 3c 70 3e 20 | <|/p>.<p> |
|00003c60| 20 20 20 20 20 70 75 74 | 20 22 72 22 20 69 6e 74 | put| "r" int|
|00003c70| 6f 20 63 68 61 72 20 32 | 20 6f 66 20 6c 69 6e 65 |o char 2| of line|
|00003c80| 20 74 4c 69 6e 65 4e 6f | 20 6f 66 20 74 54 65 78 | tLineNo| of tTex|
|00003c90| 74 20 20 20 20 20 20 20 | 20 20 20 3c 2f 70 3e 0a |t | </p>.|
|00003ca0| 3c 70 3e 20 20 20 20 65 | 6e 64 20 69 66 20 20 20 |<p> e|nd if |
|00003cb0| 20 20 20 20 20 20 20 3c | 2f 70 3e 0a 3c 70 3e 20 | <|/p>.<p> |
|00003cc0| 20 20 20 2d 2d 73 69 7a | 65 20 20 20 20 20 20 20 | --siz|e |
|00003cd0| 20 20 20 3c 2f 70 3e 0a | 3c 70 3e 20 20 20 20 70 | </p>.|<p> p|
|00003ce0| 75 74 20 6c 69 6e 65 4f | 66 66 73 65 74 28 22 53 |ut lineO|ffset("S|
|00003cf0| 69 7a 65 22 26 61 6d 70 | 3b 63 72 2c 74 54 65 78 |ize"&amp|;cr,tTex|
|00003d00| 74 29 20 69 6e 74 6f 20 | 74 53 74 61 72 74 4e 75 |t) into |tStartNu|
|00003d10| 6d 20 20 20 20 20 20 20 | 20 20 20 3c 2f 70 3e 0a |m | </p>.|
|00003d20| 3c 70 3e 20 20 20 20 69 | 66 20 74 53 69 7a 65 20 |<p> i|f tSize |
|00003d30| 69 73 20 65 6d 70 74 79 | 20 74 68 65 6e 20 70 75 |is empty| then pu|
|00003d40| 74 20 71 75 6f 74 65 20 | 26 61 6d 70 3b 20 22 45 |t quote |&amp; "E|
|00003d50| 6d 70 74 79 22 20 26 61 | 6d 70 3b 20 71 75 6f 74 |mpty" &a|mp; quot|
|00003d60| 65 20 69 6e 74 6f 20 74 | 53 69 7a 65 20 20 20 20 |e into t|Size |
|00003d70| 20 20 20 20 20 20 3c 2f | 70 3e 0a 3c 70 3e 20 20 | </|p>.<p> |
|00003d80| 20 20 70 75 74 20 6c 69 | 6e 65 4f 66 66 73 65 74 | put li|neOffset|
|00003d90| 28 74 53 69 7a 65 2c 74 | 54 65 78 74 2c 74 53 74 |(tSize,t|Text,tSt|
|00003da0| 61 72 74 4e 75 6d 29 2b | 74 53 74 61 72 74 4e 75 |artNum)+|tStartNu|
|00003db0| 6d 20 69 6e 74 6f 20 74 | 4c 69 6e 65 4e 6f 20 20 |m into t|LineNo |
|00003dc0| 20 20 20 20 20 20 20 20 | 3c 2f 70 3e 0a 3c 70 3e | |</p>.<p>|
|00003dd0| 20 20 20 20 69 66 20 74 | 4c 69 6e 65 4e 6f 20 69 | if t|LineNo i|
|00003de0| 73 20 6e 6f 74 20 30 20 | 74 68 65 6e 20 20 20 20 |s not 0 |then |
|00003df0| 20 20 20 20 20 20 3c 2f | 70 3e 0a 3c 70 3e 20 20 | </|p>.<p> |
|00003e00| 20 20 20 20 69 66 20 74 | 53 69 7a 65 20 69 73 20 | if t|Size is |
|00003e10| 6e 6f 74 20 61 6d 6f 6e | 67 20 74 68 65 20 69 74 |not amon|g the it|
|00003e20| 65 6d 73 20 6f 66 20 22 | 45 6d 70 74 79 2c 38 2c |ems of "|Empty,8,|
|00003e30| 39 2c 31 30 2c 31 32 2c | 31 34 2c 31 38 2c 32 34 |9,10,12,|14,18,24|
|00003e40| 2c 33 36 2c 34 38 2c 4d | 75 6c 74 69 70 6c 65 22 |,36,48,M|ultiple"|
|00003e50| 20 74 68 65 6e 20 70 75 | 74 20 6c 69 6e 65 4f 66 | then pu|t lineOf|
|00003e60| 66 73 65 74 28 22 4f 74 | 68 65 72 2e 2e 2e 22 26 |fset("Ot|her..."&|
|00003e70| 61 6d 70 3b 63 72 2c 74 | 54 65 78 74 29 20 69 6e |amp;cr,t|Text) in|
|00003e80| 74 6f 20 74 4c 69 6e 65 | 4e 6f 20 20 20 20 20 20 |to tLine|No |
|00003e90| 20 20 20 20 3c 2f 70 3e | 0a 3c 70 3e 20 20 20 20 | </p>|.<p> |
|00003ea0| 20 20 70 75 74 20 22 72 | 22 20 69 6e 74 6f 20 63 | put "r|" into c|
|00003eb0| 68 61 72 20 32 20 6f 66 | 20 6c 69 6e 65 20 74 4c |har 2 of| line tL|
|00003ec0| 69 6e 65 4e 6f 20 6f 66 | 20 74 54 65 78 74 20 20 |ineNo of| tText |
|00003ed0| 20 20 20 20 20 20 20 20 | 3c 2f 70 3e 0a 3c 70 3e | |</p>.<p>|
|00003ee0| 20 20 20 20 65 6e 64 20 | 69 66 20 20 20 20 20 20 | end |if |
|00003ef0| 20 20 20 20 3c 2f 70 3e | 0a 3c 70 3e 20 20 20 20 | </p>|.<p> |
|00003f00| 2d 2d 73 74 79 6c 65 20 | 20 20 20 20 20 20 20 20 |--style | |
|00003f10| 20 3c 2f 70 3e 0a 3c 70 | 3e 20 20 20 20 72 65 70 | </p>.<p|> rep|
|00003f20| 6c 61 63 65 20 22 74 68 | 72 65 65 64 62 6f 78 22 |lace "th|reedbox"|
|00003f30| 20 77 69 74 68 20 22 33 | 44 20 42 6f 78 22 20 69 | with "3|D Box" i|
|00003f40| 6e 20 74 53 74 79 6c 65 | 20 20 20 20 20 20 20 20 |n tStyle| |
|00003f50| 20 20 3c 2f 70 3e 0a 3c | 70 3e 20 20 20 20 72 65 | </p>.<|p> re|
|00003f60| 70 65 61 74 20 66 6f 72 | 20 65 61 63 68 20 69 74 |peat for| each it|
|00003f70| 65 6d 20 74 49 74 65 6d | 20 69 6e 20 74 53 74 79 |em tItem| in tSty|
|00003f80| 6c 65 20 20 20 20 20 20 | 20 20 20 20 3c 2f 70 3e |le | </p>|
|00003f90| 0a 3c 70 3e 20 20 20 20 | 20 20 70 75 74 20 6c 69 |.<p> | put li|
|00003fa0| 6e 65 4f 66 66 73 65 74 | 28 74 49 74 65 6d 2c 20 |neOffset|(tItem, |
|00003fb0| 74 54 65 78 74 29 20 69 | 6e 74 6f 20 74 4c 69 6e |tText) i|nto tLin|
|00003fc0| 65 4e 6f 20 20 20 20 20 | 20 20 20 20 20 3c 2f 70 |eNo | </p|
|00003fd0| 3e 0a 3c 70 3e 20 20 20 | 20 20 20 69 66 20 74 4c |>.<p> | if tL|
|00003fe0| 69 6e 65 4e 6f 20 69 73 | 20 6e 6f 74 20 30 20 74 |ineNo is| not 0 t|
|00003ff0| 68 65 6e 20 70 75 74 20 | 22 63 22 20 69 6e 74 6f |hen put |"c" into|
|00004000| 20 63 68 61 72 20 32 20 | 6f 66 20 6c 69 6e 65 20 | char 2 |of line |
|00004010| 74 4c 69 6e 65 4e 6f 20 | 6f 66 20 74 54 65 78 74 |tLineNo |of tText|
|00004020| 20 20 20 20 20 20 20 20 | 20 20 3c 2f 70 3e 0a 3c | | </p>.<|
|00004030| 70 3e 20 20 20 20 65 6e | 64 20 72 65 70 65 61 74 |p> en|d repeat|
|00004040| 20 20 20 20 20 20 20 20 | 20 20 3c 2f 70 3e 0a 3c | | </p>.<|
|00004050| 70 3e 20 20 20 20 2d 2d | 63 6f 6c 6f 72 20 20 20 |p> --|color |
|00004060| 20 20 20 20 20 20 20 3c | 2f 70 3e 0a 3c 70 3e 20 | <|/p>.<p> |
|00004070| 20 20 20 69 66 20 74 43 | 6f 6c 6f 72 20 69 73 20 | if tC|olor is |
|00004080| 22 30 2c 30 2c 30 22 20 | 74 68 65 6e 20 70 75 74 |"0,0,0" |then put|
|00004090| 20 22 42 6c 61 63 6b 22 | 20 69 6e 74 6f 20 74 43 | "Black"| into tC|
|000040a0| 6f 6c 6f 72 20 20 20 20 | 20 20 20 20 20 20 3c 2f |olor | </|
|000040b0| 70 3e 0a 3c 70 3e 20 20 | 20 20 69 66 20 74 43 6f |p>.<p> | if tCo|
|000040c0| 6c 6f 72 20 69 73 20 22 | 32 35 35 2c 32 35 35 2c |lor is "|255,255,|
|000040d0| 32 35 35 22 20 74 68 65 | 6e 20 70 75 74 20 22 57 |255" the|n put "W|
|000040e0| 68 69 74 65 22 20 69 6e | 74 6f 20 74 43 6f 6c 6f |hite" in|to tColo|
|000040f0| 72 20 20 20 20 20 20 20 | 20 20 20 3c 2f 70 3e 0a |r | </p>.|
|00004100| 3c 70 3e 20 20 20 20 69 | 66 20 74 63 6f 6c 6f 72 |<p> i|f tcolor|
|00004110| 20 69 73 20 22 32 35 35 | 2c 30 2c 30 22 20 74 68 | is "255|,0,0" th|
|00004120| 65 6e 20 70 75 74 20 22 | 52 65 64 22 20 69 6e 74 |en put "|Red" int|
|00004130| 6f 20 74 43 6f 6c 6f 72 | 20 20 20 20 20 20 20 20 |o tColor| |
|00004140| 20 20 3c 2f 70 3e 0a 3c | 70 3e 20 20 20 20 69 66 | </p>.<|p> if|
|00004150| 20 74 43 6f 6c 6f 72 20 | 69 73 20 22 30 2c 32 35 | tColor |is "0,25|
|00004160| 35 2c 30 22 20 74 68 65 | 6e 20 70 75 74 20 22 47 |5,0" the|n put "G|
|00004170| 72 65 65 6e 22 20 69 6e | 74 6f 20 74 43 6f 6c 6f |reen" in|to tColo|
|00004180| 72 20 20 20 20 20 20 20 | 20 20 20 3c 2f 70 3e 0a |r | </p>.|
|00004190| 3c 70 3e 20 20 20 20 69 | 66 20 74 43 6f 6c 6f 72 |<p> i|f tColor|
|000041a0| 20 69 73 20 22 30 2c 30 | 2c 32 35 35 22 20 74 68 | is "0,0|,255" th|
|000041b0| 65 6e 20 70 75 74 20 22 | 42 6c 75 65 22 20 69 6e |en put "|Blue" in|
|000041c0| 74 6f 20 74 43 6f 6c 6f | 72 20 20 20 20 20 20 20 |to tColo|r |
|000041d0| 20 20 20 3c 2f 70 3e 0a | 3c 70 3e 20 20 20 20 69 | </p>.|<p> i|
|000041e0| 66 20 74 43 6f 6c 6f 72 | 20 69 73 20 22 32 35 35 |f tColor| is "255|
|000041f0| 2c 32 35 35 2c 30 22 20 | 74 68 65 6e 20 70 75 74 |,255,0" |then put|
|00004200| 20 22 59 65 6c 6c 6f 77 | 22 20 69 6e 74 6f 20 74 | "Yellow|" into t|
|00004210| 43 6f 6c 6f 72 20 20 20 | 20 20 20 20 20 20 20 3c |Color | <|
|00004220| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 70 75 74 20 6c |/p>.<p> | put l|
|00004230| 69 6e 65 4f 66 66 73 65 | 74 28 22 43 6f 6c 6f 72 |ineOffse|t("Color|
|00004240| 22 26 61 6d 70 3b 63 72 | 2c 74 54 65 78 74 29 20 |"&amp;cr|,tText) |
|00004250| 69 6e 74 6f 20 74 53 74 | 61 72 74 4e 75 6d 20 20 |into tSt|artNum |
|00004260| 20 20 20 20 20 20 20 20 | 3c 2f 70 3e 0a 3c 70 3e | |</p>.<p>|
|00004270| 20 20 20 20 69 66 20 74 | 43 6f 6c 6f 72 20 69 73 | if t|Color is|
|00004280| 20 65 6d 70 74 79 20 74 | 68 65 6e 20 70 75 74 20 | empty t|hen put |
|00004290| 22 45 6d 70 74 79 22 20 | 69 6e 74 6f 20 74 43 6f |"Empty" |into tCo|
|000042a0| 6c 6f 72 20 20 20 20 20 | 20 20 20 20 20 3c 2f 70 |lor | </p|
|000042b0| 3e 0a 3c 70 3e 20 20 20 | 20 69 66 20 74 43 6f 6c |>.<p> | if tCol|
|000042c0| 6f 72 20 69 73 20 74 68 | 65 20 70 65 6e 43 6f 6c |or is th|e penCol|
|000042d0| 6f 72 20 74 68 65 6e 20 | 70 75 74 20 22 70 65 6e |or then |put "pen|
|000042e0| 20 63 6f 6c 6f 72 22 20 | 69 6e 74 6f 20 74 43 6f | color" |into tCo|
|000042f0| 6c 6f 72 20 20 20 20 20 | 20 20 20 20 20 3c 2f 70 |lor | </p|
|00004300| 3e 0a 3c 70 3e 20 20 20 | 20 70 75 74 20 6c 69 6e |>.<p> | put lin|
|00004310| 65 4f 66 66 73 65 74 28 | 74 43 6f 6c 6f 72 2c 74 |eOffset(|tColor,t|
|00004320| 54 65 78 74 2c 74 53 74 | 61 72 74 4e 75 6d 29 2b |Text,tSt|artNum)+|
|00004330| 74 53 74 61 72 74 4e 75 | 6d 20 69 6e 74 6f 20 74 |tStartNu|m into t|
|00004340| 4c 69 6e 65 4e 6f 20 20 | 20 20 20 20 20 20 20 20 |LineNo | |
|00004350| 3c 2f 70 3e 0a 3c 70 3e | 20 20 20 20 69 66 20 74 |</p>.<p>| if t|
|00004360| 4c 69 6e 65 4e 6f 20 69 | 73 20 6e 6f 74 20 30 20 |LineNo i|s not 0 |
|00004370| 61 6e 64 20 74 4c 69 6e | 65 4e 6f 20 69 73 20 6e |and tLin|eNo is n|
|00004380| 6f 74 20 74 53 74 61 72 | 74 4e 75 6d 20 74 68 65 |ot tStar|tNum the|
|00004390| 6e 20 20 20 20 20 20 20 | 20 20 20 3c 2f 70 3e 0a |n | </p>.|
|000043a0| 3c 70 3e 20 20 20 20 20 | 20 70 75 74 20 22 72 22 |<p> | put "r"|
|000043b0| 20 69 6e 74 6f 20 63 68 | 61 72 20 32 20 6f 66 20 | into ch|ar 2 of |
|000043c0| 6c 69 6e 65 20 74 4c 69 | 6e 65 4e 6f 20 6f 66 20 |line tLi|neNo of |
|000043d0| 74 54 65 78 74 20 20 20 | 20 20 20 20 20 20 20 3c |tText | <|
|000043e0| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 65 6e 64 20 69 |/p>.<p> | end i|
|000043f0| 66 20 20 20 20 20 20 20 | 20 20 20 3c 2f 70 3e 0a |f | </p>.|
|00004400| 3c 70 3e 20 20 20 20 2d | 2d 61 6c 69 67 6e 3c 2f |<p> -|-align</|
|00004410| 70 3e 0a 3c 70 3e 20 20 | 20 20 69 66 20 74 41 6c |p>.<p> | if tAl|
|00004420| 69 67 6e 20 69 73 20 6e | 6f 74 20 65 6d 70 74 79 |ign is n|ot empty|
|00004430| 20 74 68 65 6e 20 20 20 | 20 20 20 20 20 20 20 3c | then | <|
|00004440| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 20 20 70 75 74 |/p>.<p> | put|
|00004450| 20 22 72 22 20 69 6e 74 | 6f 20 63 68 61 72 20 33 | "r" int|o char 3|
|00004460| 20 6f 66 20 6c 69 6e 65 | 20 6c 69 6e 65 4f 66 66 | of line| lineOff|
|00004470| 73 65 74 28 74 41 6c 69 | 67 6e 2c 74 54 65 78 74 |set(tAli|gn,tText|
|00004480| 29 20 6f 66 20 74 54 65 | 78 74 20 20 20 20 20 20 |) of tTe|xt |
|00004490| 20 20 20 20 3c 2f 70 3e | 0a 3c 70 3e 20 20 20 20 | </p>|.<p> |
|000044a0| 65 6e 64 20 69 66 20 20 | 20 20 20 20 20 20 20 20 |end if | |
|000044b0| 3c 2f 70 3e 0a 3c 70 3e | 20 20 20 20 2d 2d 73 65 |</p>.<p>| --se|
|000044c0| 74 20 6d 65 6e 75 20 20 | 20 20 20 20 20 20 20 20 |t menu | |
|000044d0| 3c 2f 70 3e 0a 3c 70 3e | 20 20 20 20 72 65 70 6c |</p>.<p>| repl|
|000044e0| 61 63 65 20 22 4f 77 6e | 65 72 27 73 22 20 77 69 |ace "Own|er's" wi|
|000044f0| 74 68 20 22 44 65 66 61 | 75 6c 74 22 20 69 6e 20 |th "Defa|ult" in |
|00004500| 74 54 65 78 74 20 20 20 | 20 20 20 20 20 20 20 3c |tText | <|
|00004510| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 73 65 74 20 74 |/p>.<p> | set t|
|00004520| 68 65 20 74 65 78 74 20 | 6f 66 20 62 74 6e 20 22 |he text |of btn "|
|00004530| 54 65 78 74 22 20 6f 66 | 20 73 74 61 63 6b 20 22 |Text" of| stack "|
|00004540| 72 65 76 53 63 72 69 70 | 74 4d 65 6e 75 73 22 20 |revScrip|tMenus" |
|00004550| 74 6f 20 74 54 65 78 74 | 20 20 20 20 20 20 20 20 |to tText| |
|00004560| 20 20 3c 2f 70 3e 0a 3c | 70 3e 20 20 65 6e 64 20 | </p>.<|p> end |
|00004570| 69 66 20 20 20 20 20 20 | 20 20 20 20 3c 2f 70 3e |if | </p>|
|00004580| 0a 3c 70 3e 20 20 75 6e | 6c 6f 63 6b 20 6d 65 6e |.<p> un|lock men|
|00004590| 75 73 20 20 20 20 20 20 | 20 20 20 20 3c 2f 70 3e |us | </p>|
|000045a0| 0a 3c 70 3e 65 6e 64 20 | 6d 6f 75 73 65 44 6f 77 |.<p>end |mouseDow|
|000045b0| 6e 20 20 20 20 20 20 20 | 20 20 20 3c 2f 70 3e 0a |n | </p>.|
|000045c0| 3c 70 3e 3c 2f 70 3e 08 | 00 00 03 f7 00 05 46 69 |<p></p>.|......Fi|
|000045d0| 6c 65 00 e0 c5 8a 55 07 | 16 6f 6e 20 6d 65 6e 75 |le....U.|.on menu|
|000045e0| 50 69 63 6b 20 70 57 68 | 69 63 68 20 20 20 0a 20 |Pick pWh|ich . |
|000045f0| 20 67 6c 6f 62 61 6c 20 | 67 52 45 56 54 6f 70 45 | global |gREVTopE|
|00004600| 64 69 74 6f 72 20 20 20 | 0a 20 20 73 65 74 20 74 |ditor |. set t|
|00004610| 68 65 20 64 65 66 61 75 | 6c 74 53 74 61 63 6b 20 |he defau|ltStack |
|00004620| 74 6f 20 67 52 45 56 54 | 6f 70 45 64 69 74 6f 72 |to gREVT|opEditor|
|00004630| 20 20 20 0a 20 20 73 77 | 69 74 63 68 20 70 57 68 | . sw|itch pWh|
|00004640| 69 63 68 20 20 20 0a 20 | 20 63 61 73 65 20 22 70 |ich . | case "p|
|00004650| 61 67 65 20 73 65 74 75 | 70 22 20 20 20 0a 20 20 |age setu|p" . |
|00004660| 20 20 61 6e 73 77 65 72 | 20 70 72 69 6e 74 65 72 | answer| printer|
|00004670| 20 20 20 0a 20 20 20 20 | 62 72 65 61 6b 20 20 20 | . |break |
|00004680| 0a 20 20 63 61 73 65 20 | 22 71 75 69 74 22 20 20 |. case |"quit" |
|00004690| 20 0a 20 20 20 20 67 6c | 6f 62 61 6c 20 67 52 45 | . gl|obal gRE|
|000046a0| 56 53 75 70 70 72 65 73 | 73 4d 65 73 73 61 67 65 |VSuppres|sMessage|
|000046b0| 73 20 20 20 0a 20 20 20 | 20 69 66 20 6e 6f 74 20 |s . | if not |
|000046c0| 67 52 45 56 53 75 70 70 | 72 65 73 73 4d 65 73 73 |gREVSupp|ressMess|
|000046d0| 61 67 65 73 20 61 6e 64 | 20 22 73 68 75 74 44 6f |ages and| "shutDo|
|000046e0| 77 6e 22 20 69 73 20 61 | 6d 6f 6e 67 20 74 68 65 |wn" is a|mong the|
|000046f0| 20 6c 69 6e 65 73 20 6f | 66 20 74 68 65 20 63 52 | lines o|f the cR|
|00004700| 45 56 47 65 6e 65 72 61 | 6c 5b 68 61 6e 64 6c 65 |EVGenera|l[handle|
|00004710| 72 4c 69 73 74 5d 20 6f | 66 20 74 68 69 73 20 63 |rList] o|f this c|
|00004720| 64 20 6f 66 20 74 68 65 | 20 74 6f 70 53 74 61 63 |d of the| topStac|
|00004730| 6b 20 74 68 65 6e 20 73 | 65 6e 64 20 22 73 68 75 |k then s|end "shu|
|00004740| 74 44 6f 77 6e 22 20 74 | 6f 20 74 68 69 73 20 63 |tDown" t|o this c|
|00004750| 64 20 6f 66 20 74 68 65 | 20 74 6f 70 53 74 61 63 |d of the| topStac|
|00004760| 6b 20 20 20 0a 20 20 20 | 20 72 65 76 51 75 69 74 |k . | revQuit|
|00004770| 43 68 65 63 6b 20 20 20 | 0a 20 20 20 20 62 72 65 |Check |. bre|
|00004780| 61 6b 20 20 20 0a 20 20 | 63 61 73 65 20 22 70 72 |ak . |case "pr|
|00004790| 69 6e 74 20 73 63 72 69 | 70 74 2e 2e 2e 22 20 20 |int scri|pt..." |
|000047a0| 20 0a 20 20 20 20 72 65 | 76 53 68 6f 77 50 72 69 | . re|vShowPri|
|000047b0| 6e 74 44 69 61 6c 6f 67 | 20 74 72 75 65 2c 74 72 |ntDialog| true,tr|
|000047c0| 75 65 20 20 20 0a 20 20 | 20 20 69 66 20 74 68 65 |ue . | if the|
|000047d0| 20 63 53 68 6f 77 41 73 | 48 61 6e 64 6c 65 72 73 | cShowAs|Handlers|
|000047e0| 20 6f 66 20 74 68 69 73 | 20 63 64 20 69 73 20 66 | of this| cd is f|
|000047f0| 61 6c 73 65 20 74 68 65 | 6e 20 20 20 0a 20 20 20 |alse the|n . |
|00004800| 20 20 20 20 20 0a 20 20 | 20 20 20 20 2d 2d 20 20 | . | -- |
|00004810| 70 72 69 6e 74 66 69 65 | 6c 64 20 66 69 65 6c 64 |printfie|ld field|
|00004820| 20 22 45 64 69 74 69 6e | 67 20 4f 62 6a 65 63 74 | "Editin|g Object|
|00004830| 22 20 26 20 74 61 62 20 | 26 20 74 61 62 20 26 20 |" & tab |& tab & |
|00004840| 22 3c 25 70 61 67 65 6e | 75 6d 62 65 72 25 3e 22 |"<%pagen|umber%>"|
|00004850| 2c 5c 20 20 20 0a 20 20 | 20 20 20 20 2d 2d 20 66 |,\ . | -- f|
|00004860| 69 65 6c 64 20 22 45 64 | 69 74 6f 72 20 46 69 65 |ield "Ed|itor Fie|
|00004870| 6c 64 22 2c 20 22 3c 25 | 74 68 65 20 74 69 6d 65 |ld", "<%|the time|
|00004880| 25 3e 20 3c 25 74 68 65 | 20 64 61 74 65 25 3e 22 |%> <%the| date%>"|
|00004890| 20 20 20 0a 20 20 20 20 | 20 20 20 20 0a 20 20 20 | . | . |
|000048a0| 20 20 20 72 65 76 50 72 | 69 6e 74 54 65 78 74 20 | revPr|intText |
|000048b0| 74 68 65 20 68 74 6d 6c | 54 65 78 74 20 6f 66 20 |the html|Text of |
|000048c0| 66 6c 64 20 22 73 63 72 | 69 70 74 22 2c 74 68 65 |fld "scr|ipt",the|
|000048d0| 20 6c 6f 6e 67 20 69 64 | 20 6f 66 20 74 68 65 20 | long id| of the |
|000048e0| 63 54 61 72 67 65 74 4f | 62 6a 65 63 74 20 6f 66 |cTargetO|bject of|
|000048f0| 20 74 68 69 73 20 63 64 | 2c 22 3c 25 74 68 65 20 | this cd|,"<%the |
|00004900| 74 69 6d 65 25 3e 20 3c | 25 74 68 65 20 64 61 74 |time%> <|%the dat|
|00004910| 65 25 3e 20 3c 25 70 61 | 67 65 6e 75 6d 62 65 72 |e%> <%pa|genumber|
|00004920| 25 3e 22 2c 74 68 65 20 | 6c 6f 6e 67 20 69 64 20 |%>",the |long id |
|00004930| 6f 66 20 66 6c 64 20 22 | 73 63 72 69 70 74 22 20 |of fld "|script" |
|00004940| 20 20 0a 20 20 20 20 20 | 20 20 20 0a 20 20 20 20 | . | . |
|00004950| 20 20 2d 2d 20 67 65 74 | 20 72 65 76 50 72 69 6e | -- get| revPrin|
|00004960| 74 46 69 65 6c 64 28 74 | 68 65 20 6c 6f 6e 67 20 |tField(t|he long |
|00004970| 69 64 20 6f 66 20 66 69 | 65 6c 64 20 22 73 63 72 |id of fi|eld "scr|
|00004980| 69 70 74 22 29 20 20 20 | 0a 20 20 20 20 65 6c 73 |ipt") |. els|
|00004990| 65 20 20 20 0a 20 20 20 | 20 20 20 73 65 74 20 74 |e . | set t|
|000049a0| 68 65 20 69 74 65 6d 44 | 65 6c 20 74 6f 20 22 3a |he itemD|el to ":|
|000049b0| 22 20 20 20 0a 20 20 20 | 20 20 20 70 75 74 20 77 |" . | put w|
|000049c0| 6f 72 64 20 31 20 6f 66 | 20 69 74 65 6d 20 2d 31 |ord 1 of| item -1|
|000049d0| 20 6f 66 20 74 68 65 20 | 6c 61 62 65 6c 20 6f 66 | of the |label of|
|000049e0| 20 62 74 6e 20 22 68 61 | 6e 64 6c 65 72 73 22 20 | btn "ha|ndlers" |
|000049f0| 69 6e 74 6f 20 74 48 61 | 6e 64 6c 65 72 6e 61 6d |into tHa|ndlernam|
|00004a00| 65 20 20 20 0a 20 20 20 | 20 20 20 73 65 6e 64 20 |e . | send |
|00004a10| 22 6d 65 6e 75 50 69 63 | 6b 22 20 26 26 20 71 75 |"menuPic|k" && qu|
|00004a20| 6f 74 65 20 26 20 74 48 | 61 6e 64 6c 65 72 4e 61 |ote & tH|andlerNa|
|00004a30| 6d 65 20 26 20 71 75 6f | 74 65 20 74 6f 20 62 74 |me & quo|te to bt|
|00004a40| 6e 20 22 68 61 6e 64 6c | 65 72 73 22 20 20 20 0a |n "handl|ers" .|
|00004a50| 20 20 20 20 20 20 72 65 | 76 50 72 69 6e 74 54 65 | re|vPrintTe|
|00004a60| 78 74 20 74 68 65 20 68 | 74 6d 6c 54 65 78 74 20 |xt the h|tmlText |
|00004a70| 6f 66 20 66 6c 64 20 22 | 73 63 72 69 70 74 22 2c |of fld "|script",|
|00004a80| 74 68 65 20 6c 6f 6e 67 | 20 69 64 20 6f 66 20 74 |the long| id of t|
|00004a90| 68 65 20 63 54 61 72 67 | 65 74 4f 62 6a 65 63 74 |he cTarg|etObject|
|00004aa0| 20 6f 66 20 74 68 69 73 | 20 63 64 2c 22 3c 25 74 | of this| cd,"<%t|
|00004ab0| 68 65 20 74 69 6d 65 25 | 3e 20 3c 25 74 68 65 20 |he time%|> <%the |
|00004ac0| 64 61 74 65 25 3e 20 3c | 25 70 61 67 65 6e 75 6d |date%> <|%pagenum|
|00004ad0| 62 65 72 25 3e 22 2c 74 | 68 65 20 6c 6f 6e 67 20 |ber%>",t|he long |
|00004ae0| 69 64 20 6f 66 20 66 6c | 64 20 22 73 63 72 69 70 |id of fl|d "scrip|
|00004af0| 74 22 20 20 20 0a 20 20 | 20 20 65 6e 64 20 69 66 |t" . | end if|
|00004b00| 20 20 20 0a 20 20 20 20 | 62 72 65 61 6b 20 20 20 | . |break |
|00004b10| 0a 20 20 63 61 73 65 20 | 22 61 70 70 6c 79 20 73 |. case |"apply s|
|00004b20| 63 72 69 70 74 22 20 20 | 20 0a 20 20 20 20 63 6c |cript" | . cl|
|00004b30| 69 63 6b 20 61 74 20 74 | 68 65 20 6c 6f 63 20 6f |ick at t|he loc o|
|00004b40| 66 20 62 74 6e 20 22 61 | 70 70 6c 79 22 20 20 20 |f btn "a|pply" |
|00004b50| 0a 20 20 20 20 62 72 65 | 61 6b 20 20 20 0a 20 20 |. bre|ak . |
|00004b60| 63 61 73 65 20 22 63 6c | 6f 73 65 20 73 63 72 69 |case "cl|ose scri|
|00004b70| 70 74 20 65 64 69 74 6f | 72 22 20 20 20 0a 20 20 |pt edito|r" . |
|00004b80| 20 20 63 6c 6f 73 65 20 | 74 68 69 73 20 73 74 61 | close |this sta|
|00004b90| 63 6b 20 20 20 0a 20 20 | 20 20 62 72 65 61 6b 20 |ck . | break |
|00004ba0| 20 20 0a 20 20 63 61 73 | 65 20 22 61 70 70 6c 79 | . cas|e "apply|
|00004bb0| 20 73 63 72 69 70 74 20 | 61 6e 64 20 63 6c 6f 73 | script |and clos|
|00004bc0| 65 22 20 20 20 0a 20 20 | 20 20 63 6c 69 63 6b 20 |e" . | click |
|00004bd0| 61 74 20 74 68 65 20 6c | 6f 63 20 6f 66 20 62 74 |at the l|oc of bt|
|00004be0| 6e 20 22 61 70 70 6c 79 | 22 20 20 20 0a 20 20 20 |n "apply|" . |
|00004bf0| 20 63 6c 6f 73 65 20 74 | 68 69 73 20 73 74 61 63 | close t|his stac|
|00004c00| 6b 20 20 20 0a 20 20 20 | 20 62 72 65 61 6b 20 20 |k . | break |
|00004c10| 20 0a 20 20 63 61 73 65 | 20 22 61 70 70 6c 79 20 | . case| "apply |
|00004c20| 73 63 72 69 70 74 20 61 | 6e 64 20 73 61 76 65 20 |script a|nd save |
|00004c30| 73 74 61 63 6b 22 20 20 | 0a 20 20 20 20 63 6c 69 |stack" |. cli|
|00004c40| 63 6b 20 61 74 20 74 68 | 65 20 6c 6f 63 20 6f 66 |ck at th|e loc of|
|00004c50| 20 62 74 6e 20 22 61 70 | 70 6c 79 22 20 20 0a 20 | btn "ap|ply" . |
|00004c60| 20 20 20 73 65 6e 64 20 | 22 6d 65 6e 75 50 69 63 | send |"menuPic|
|00004c70| 6b 22 20 26 26 20 71 75 | 6f 74 65 20 26 20 22 53 |k" && qu|ote & "S|
|00004c80| 61 76 65 22 20 26 20 71 | 75 6f 74 65 20 74 6f 20 |ave" & q|uote to |
|00004c90| 62 74 6e 20 22 46 69 6c | 65 22 20 6f 66 20 73 74 |btn "Fil|e" of st|
|00004ca0| 61 63 6b 20 22 72 65 76 | 4d 65 6e 75 42 61 72 22 |ack "rev|MenuBar"|
|00004cb0| 20 0a 20 20 20 20 62 72 | 65 61 6b 20 20 0a 20 20 | . br|eak . |
|00004cc0| 65 6e 64 20 73 77 69 74 | 63 68 20 20 20 0a 20 20 |end swit|ch . |
|00004cd0| 65 78 69 74 20 74 6f 20 | 74 6f 70 20 20 20 0a 65 |exit to |top .e|
|00004ce0| 6e 64 20 6d 65 6e 75 50 | 69 63 6b 20 20 0a 00 00 |nd menuP|ick ...|
|00004cf0| 00 00 00 80 00 00 00 ff | ff 00 1c 00 12 00 00 00 |........|........|
|00004d00| 03 0a 72 65 76 42 75 74 | 74 6f 6e 00 00 05 66 61 |..revBut|ton...fa|
|00004d10| 6c 73 65 08 63 6f 6d 6d | 61 6e 64 00 00 05 66 61 |lse.comm|and...fa|
|00004d20| 6c 73 65 09 72 65 76 62 | 61 73 69 63 00 00 05 66 |lse.revb|asic...f|
|00004d30| 61 6c 73 65 00 00 00 7a | 41 70 70 6c 79 20 53 63 |alse...z|Apply Sc|
|00004d40| 72 69 70 74 0a 43 6c 6f | 73 65 20 53 63 72 69 70 |ript.Clo|se Scrip|
|00004d50| 74 20 45 64 69 74 6f 72 | 0a 41 70 70 6c 79 20 53 |t Editor|.Apply S|
|00004d60| 63 72 69 70 74 20 41 6e | 64 20 43 6c 6f 73 65 0a |cript An|d Close.|
|00004d70| 41 70 70 6c 79 20 53 63 | 72 69 70 74 20 41 6e 64 |Apply Sc|ript And|
|00004d80| 20 53 61 76 65 20 53 74 | 61 63 6b 0a 2d 0a 50 61 | Save St|ack.-.Pa|
|00004d90| 67 65 20 53 65 74 75 70 | 0a 50 72 69 6e 74 20 53 |ge Setup|.Print S|
|00004da0| 63 72 69 70 74 2e 2e 2e | 2f 50 0a 2d 0a 51 75 69 |cript...|/P.-.Qui|
|00004db0| 74 00 01 06 00 00 00 1a | 02 01 18 00 0c 63 52 45 |t.......|.....cRE|
|00004dc0| 56 47 65 6e 65 72 61 6c | 00 00 00 00 08 0f 73 63 |VGeneral|......sc|
|00004dd0| 72 69 70 74 43 68 65 63 | 6b 73 75 6d 00 00 10 e2 |riptChec|ksum....|
|00004de0| f5 1b ce a7 35 bd ff 1b | 46 4a fb 9c b9 ee a2 0a |....5...|FJ......|
|00004df0| 62 6f 6f 6b 6d 61 72 6b | 73 00 00 00 0c 72 65 76 |bookmark|s....rev|
|00004e00| 55 6e 69 71 75 65 49 44 | 00 00 0c 39 37 31 35 34 |UniqueID|...97154|
|00004e10| 30 39 36 39 31 36 31 0c | 68 61 6e 64 6c 65 72 4c |0969161.|handlerL|
|00004e20| 69 73 74 00 00 08 6d 65 | 6e 75 50 69 63 6b 10 73 |ist...me|nuPick.s|
|00004e30| 63 72 69 70 74 53 65 6c | 65 63 74 69 6f 6e 00 00 |criptSel|ection..|
|00004e40| 11 63 68 61 72 20 31 37 | 36 35 20 74 6f 20 31 37 |.char 17|65 to 17|
|00004e50| 36 34 0c 70 72 65 76 48 | 61 6e 64 6c 65 72 00 00 |64.prevH|andler..|
|00004e60| 08 6d 65 6e 75 50 69 63 | 6b 0b 74 65 6d 70 53 63 |.menuPic|k.tempSc|
|00004e70| 72 69 70 74 00 00 00 07 | 73 63 72 69 70 74 00 08 |ript....|script..|
|00004e80| b8 3c 70 3e 6f 6e 20 6d | 65 6e 75 50 69 63 6b 20 |.<p>on m|enuPick |
|00004e90| 70 57 68 69 63 68 20 20 | 0a 3c 2f 70 3e 0a 3c 70 |pWhich |.</p>.<p|
|00004ea0| 3e 20 20 67 6c 6f 62 61 | 6c 20 67 52 45 56 54 6f |> globa|l gREVTo|
|00004eb0| 70 45 64 69 74 6f 72 20 | 20 0a 3c 2f 70 3e 0a 3c |pEditor | .</p>.<|
|00004ec0| 70 3e 20 20 73 65 74 20 | 74 68 65 20 64 65 66 61 |p> set |the defa|
|00004ed0| 75 6c 74 53 74 61 63 6b | 20 74 6f 20 67 52 45 56 |ultStack| to gREV|
|00004ee0| 54 6f 70 45 64 69 74 6f | 72 20 20 0a 3c 2f 70 3e |TopEdito|r .</p>|
|00004ef0| 0a 3c 70 3e 20 20 73 77 | 69 74 63 68 20 70 57 68 |.<p> sw|itch pWh|
|00004f00| 69 63 68 20 20 0a 3c 2f | 70 3e 0a 3c 70 3e 20 20 |ich .</|p>.<p> |
|00004f10| 63 61 73 65 20 22 70 61 | 67 65 20 73 65 74 75 70 |case "pa|ge setup|
|00004f20| 22 20 20 0a 3c 2f 70 3e | 0a 3c 70 3e 20 20 20 20 |" .</p>|.<p> |
|00004f30| 61 6e 73 77 65 72 20 70 | 72 69 6e 74 65 72 20 20 |answer p|rinter |
|00004f40| 0a 3c 2f 70 3e 0a 3c 70 | 3e 20 20 20 20 62 72 65 |.</p>.<p|> bre|
|00004f50| 61 6b 20 20 0a 3c 2f 70 | 3e 0a 3c 70 3e 20 20 63 |ak .</p|>.<p> c|
|00004f60| 61 73 65 20 22 71 75 69 | 74 22 20 20 0a 3c 2f 70 |ase "qui|t" .</p|
|00004f70| 3e 0a 3c 70 3e 20 20 20 | 20 67 6c 6f 62 61 6c 20 |>.<p> | global |
|00004f80| 67 52 45 56 53 75 70 70 | 72 65 73 73 4d 65 73 73 |gREVSupp|ressMess|
|00004f90| 61 67 65 73 20 20 0a 3c | 2f 70 3e 0a 3c 70 3e 20 |ages .<|/p>.<p> |
|00004fa0| 20 20 20 69 66 20 6e 6f | 74 20 67 52 45 56 53 75 | if no|t gREVSu|
|00004fb0| 70 70 72 65 73 73 4d 65 | 73 73 61 67 65 73 20 61 |ppressMe|ssages a|
|00004fc0| 6e 64 20 22 73 68 75 74 | 44 6f 77 6e 22 20 69 73 |nd "shut|Down" is|
|00004fd0| 20 61 6d 6f 6e 67 20 74 | 68 65 20 6c 69 6e 65 73 | among t|he lines|
|00004fe0| 20 6f 66 20 74 68 65 20 | 63 52 45 56 47 65 6e 65 | of the |cREVGene|
|00004ff0| 72 61 6c 5b 68 61 6e 64 | 6c 65 72 4c 69 73 74 5d |ral[hand|lerList]|
|00005000| 20 6f 66 20 74 68 69 73 | 20 63 64 20 6f 66 20 74 | of this| cd of t|
|00005010| 68 65 20 74 6f 70 53 74 | 61 63 6b 20 74 68 65 6e |he topSt|ack then|
|00005020| 20 73 65 6e 64 20 22 73 | 68 75 74 44 6f 77 6e 22 | send "s|hutDown"|
|00005030| 20 74 6f 20 74 68 69 73 | 20 63 64 20 6f 66 20 74 | to this| cd of t|
|00005040| 68 65 20 74 6f 70 53 74 | 61 63 6b 20 20 0a 3c 2f |he topSt|ack .</|
|00005050| 70 3e 0a 3c 70 3e 20 20 | 20 20 72 65 76 51 75 69 |p>.<p> | revQui|
|00005060| 74 43 68 65 63 6b 20 20 | 0a 3c 2f 70 3e 0a 3c 70 |tCheck |.</p>.<p|
|00005070| 3e 20 20 20 20 62 72 65 | 61 6b 20 20 0a 3c 2f 70 |> bre|ak .</p|
|00005080| 3e 0a 3c 70 3e 20 20 63 | 61 73 65 20 22 70 72 69 |>.<p> c|ase "pri|
|00005090| 6e 74 20 73 63 72 69 70 | 74 2e 2e 2e 22 20 20 0a |nt scrip|t..." .|
|000050a0| 3c 2f 70 3e 0a 3c 70 3e | 20 20 20 20 72 65 76 53 |</p>.<p>| revS|
|000050b0| 68 6f 77 50 72 69 6e 74 | 44 69 61 6c 6f 67 20 74 |howPrint|Dialog t|
|000050c0| 72 75 65 2c 74 72 75 65 | 20 20 0a 3c 2f 70 3e 0a |rue,true| .</p>.|
|000050d0| 3c 70 3e 20 20 20 20 69 | 66 20 74 68 65 20 63 53 |<p> i|f the cS|
|000050e0| 68 6f 77 41 73 48 61 6e | 64 6c 65 72 73 20 6f 66 |howAsHan|dlers of|
|000050f0| 20 74 68 69 73 20 63 64 | 20 69 73 20 66 61 6c 73 | this cd| is fals|
|00005100| 65 20 74 68 65 6e 20 20 | 0a 3c 2f 70 3e 0a 3c 70 |e then |.</p>.<p|
|00005110| 3e 20 20 20 20 20 20 20 | 0a 3c 2f 70 3e 0a 3c 70 |> |.</p>.<p|
|00005120| 3e 20 20 20 20 20 20 2d | 2d 20 20 70 72 69 6e 74 |> -|- print|
|00005130| 66 69 65 6c 64 20 66 69 | 65 6c 64 20 22 45 64 69 |field fi|eld "Edi|
|00005140| 74 69 6e 67 20 4f 62 6a | 65 63 74 22 20 26 61 6d |ting Obj|ect" &am|
|00005150| 70 3b 20 74 61 62 20 26 | 61 6d 70 3b 20 74 61 62 |p; tab &|amp; tab|
|00005160| 20 26 61 6d 70 3b 20 22 | 26 6c 74 3b 25 70 61 67 | &amp; "|&lt;%pag|
|00005170| 65 6e 75 6d 62 65 72 25 | 26 67 74 3b 22 2c 5c 20 |enumber%|&gt;",\ |
|00005180| 20 0a 3c 2f 70 3e 0a 3c | 70 3e 20 20 20 20 20 20 | .</p>.<|p> |
|00005190| 2d 2d 20 66 69 65 6c 64 | 20 22 45 64 69 74 6f 72 |-- field| "Editor|
|000051a0| 20 46 69 65 6c 64 22 2c | 20 22 26 6c 74 3b 25 74 | Field",| "&lt;%t|
|000051b0| 68 65 20 74 69 6d 65 25 | 26 67 74 3b 20 26 6c 74 |he time%|&gt; &lt|
|000051c0| 3b 25 74 68 65 20 64 61 | 74 65 25 26 67 74 3b 22 |;%the da|te%&gt;"|
|000051d0| 20 20 0a 3c 2f 70 3e 0a | 3c 70 3e 20 20 20 20 20 | .</p>.|<p> |
|000051e0| 20 20 0a 3c 2f 70 3e 0a | 3c 70 3e 20 20 20 20 20 | .</p>.|<p> |
|000051f0| 20 72 65 76 50 72 69 6e | 74 54 65 78 74 20 74 68 | revPrin|tText th|
|00005200| 65 20 68 74 6d 6c 54 65 | 78 74 20 6f 66 20 66 6c |e htmlTe|xt of fl|
|00005210| 64 20 22 73 63 72 69 70 | 74 22 2c 74 68 65 20 6c |d "scrip|t",the l|
|00005220| 6f 6e 67 20 69 64 20 6f | 66 20 74 68 65 20 63 54 |ong id o|f the cT|
|00005230| 61 72 67 65 74 4f 62 6a | 65 63 74 20 6f 66 20 74 |argetObj|ect of t|
|00005240| 68 69 73 20 63 64 2c 22 | 26 6c 74 3b 25 74 68 65 |his cd,"|&lt;%the|
|00005250| 20 74 69 6d 65 25 26 67 | 74 3b 20 26 6c 74 3b 25 | time%&g|t; &lt;%|
|00005260| 74 68 65 20 64 61 74 65 | 25 26 67 74 3b 20 26 6c |the date|%&gt; &l|
|00005270| 74 3b 25 70 61 67 65 6e | 75 6d 62 65 72 25 26 67 |t;%pagen|umber%&g|
|00005280| 74 3b 22 2c 74 68 65 20 | 6c 6f 6e 67 20 69 64 20 |t;",the |long id |
|00005290| 6f 66 20 66 6c 64 20 22 | 73 63 72 69 70 74 22 20 |of fld "|script" |
|000052a0| 20 0a 3c 2f 70 3e 0a 3c | 70 3e 20 20 20 20 20 20 | .</p>.<|p> |
|000052b0| 20 0a 3c 2f 70 3e 0a 3c | 70 3e 20 20 20 20 20 20 | .</p>.<|p> |
|000052c0| 2d 2d 20 67 65 74 20 72 | 65 76 50 72 69 6e 74 46 |-- get r|evPrintF|
|000052d0| 69 65 6c 64 28 74 68 65 | 20 6c 6f 6e 67 20 69 64 |ield(the| long id|
|000052e0| 20 6f 66 20 66 69 65 6c | 64 20 22 73 63 72 69 70 | of fiel|d "scrip|
|000052f0| 74 22 29 20 20 0a 3c 2f | 70 3e 0a 3c 70 3e 20 20 |t") .</|p>.<p> |
|00005300| 20 20 65 6c 73 65 20 20 | 0a 3c 2f 70 3e 0a 3c 70 | else |.</p>.<p|
|00005310| 3e 20 20 20 20 20 20 73 | 65 74 20 74 68 65 20 69 |> s|et the i|
|00005320| 74 65 6d 44 65 6c 20 74 | 6f 20 22 3a 22 20 20 0a |temDel t|o ":" .|
|00005330| 3c 2f 70 3e 0a 3c 70 3e | 20 20 20 20 20 20 70 75 |</p>.<p>| pu|
|00005340| 74 20 77 6f 72 64 20 31 | 20 6f 66 20 69 74 65 6d |t word 1| of item|
|00005350| 20 2d 31 20 6f 66 20 74 | 68 65 20 6c 61 62 65 6c | -1 of t|he label|
|00005360| 20 6f 66 20 62 74 6e 20 | 22 68 61 6e 64 6c 65 72 | of btn |"handler|
|00005370| 73 22 20 69 6e 74 6f 20 | 74 48 61 6e 64 6c 65 72 |s" into |tHandler|
|00005380| 6e 61 6d 65 20 20 0a 3c | 2f 70 3e 0a 3c 70 3e 20 |name .<|/p>.<p> |
|00005390| 20 20 20 20 20 73 65 6e | 64 20 22 6d 65 6e 75 50 | sen|d "menuP|
|000053a0| 69 63 6b 22 20 26 61 6d | 70 3b 26 61 6d 70 3b 20 |ick" &am|p;&amp; |
|000053b0| 71 75 6f 74 65 20 26 61 | 6d 70 3b 20 74 48 61 6e |quote &a|mp; tHan|
|000053c0| 64 6c 65 72 4e 61 6d 65 | 20 26 61 6d 70 3b 20 71 |dlerName| &amp; q|
|000053d0| 75 6f 74 65 20 74 6f 20 | 62 74 6e 20 22 68 61 6e |uote to |btn "han|
|000053e0| 64 6c 65 72 73 22 20 20 | 0a 3c 2f 70 3e 0a 3c 70 |dlers" |.</p>.<p|
|000053f0| 3e 20 20 20 20 20 20 72 | 65 76 50 72 69 6e 74 54 |> r|evPrintT|
|00005400| 65 78 74 20 74 68 65 20 | 68 74 6d 6c 54 65 78 74 |ext the |htmlText|
|00005410| 20 6f 66 20 66 6c 64 20 | 22 73 63 72 69 70 74 22 | of fld |"script"|
|00005420| 2c 74 68 65 20 6c 6f 6e | 67 20 69 64 20 6f 66 20 |,the lon|g id of |
|00005430| 74 68 65 20 63 54 61 72 | 67 65 74 4f 62 6a 65 63 |the cTar|getObjec|
|00005440| 74 20 6f 66 20 74 68 69 | 73 20 63 64 2c 22 26 6c |t of thi|s cd,"&l|
|00005450| 74 3b 25 74 68 65 20 74 | 69 6d 65 25 26 67 74 3b |t;%the t|ime%&gt;|
|00005460| 20 26 6c 74 3b 25 74 68 | 65 20 64 61 74 65 25 26 | &lt;%th|e date%&|
|00005470| 67 74 3b 20 26 6c 74 3b | 25 70 61 67 65 6e 75 6d |gt; &lt;|%pagenum|
|00005480| 62 65 72 25 26 67 74 3b | 22 2c 74 68 65 20 6c 6f |ber%&gt;|",the lo|
|00005490| 6e 67 20 69 64 20 6f 66 | 20 66 6c 64 20 22 73 63 |ng id of| fld "sc|
|000054a0| 72 69 70 74 22 20 20 0a | 3c 2f 70 3e 0a 3c 70 3e |ript" .|</p>.<p>|
|000054b0| 20 20 20 20 65 6e 64 20 | 69 66 20 20 0a 3c 2f 70 | end |if .</p|
|000054c0| 3e 0a 3c 70 3e 20 20 20 | 20 62 72 65 61 6b 20 20 |>.<p> | break |
|000054d0| 0a 3c 2f 70 3e 0a 3c 70 | 3e 20 20 63 61 73 65 20 |.</p>.<p|> case |
|000054e0| 22 61 70 70 6c 79 20 73 | 63 72 69 70 74 22 20 20 |"apply s|cript" |
|000054f0| 0a 3c 2f 70 3e 0a 3c 70 | 3e 20 20 20 20 63 6c 69 |.</p>.<p|> cli|
|00005500| 63 6b 20 61 74 20 74 68 | 65 20 6c 6f 63 20 6f 66 |ck at th|e loc of|
|00005510| 20 62 74 6e 20 22 61 70 | 70 6c 79 22 20 20 0a 3c | btn "ap|ply" .<|
|00005520| 2f 70 3e 0a 3c 70 3e 20 | 20 20 20 62 72 65 61 6b |/p>.<p> | break|
|00005530| 20 20 0a 3c 2f 70 3e 0a | 3c 70 3e 20 20 63 61 73 | .</p>.|<p> cas|
|00005540| 65 20 22 63 6c 6f 73 65 | 20 73 63 72 69 70 74 20 |e "close| script |
|00005550| 65 64 69 74 6f 72 22 20 | 20 0a 3c 2f 70 3e 0a 3c |editor" | .</p>.<|
|00005560| 70 3e 20 20 20 20 63 6c | 6f 73 65 20 74 68 69 73 |p> cl|ose this|
|00005570| 20 73 74 61 63 6b 20 20 | 0a 3c 2f 70 3e 0a 3c 70 | stack |.</p>.<p|
|00005580| 3e 20 20 20 20 62 72 65 | 61 6b 20 20 0a 3c 2f 70 |> bre|ak .</p|
|00005590| 3e 0a 3c 70 3e 20 20 63 | 61 73 65 20 22 61 70 70 |>.<p> c|ase "app|
|000055a0| 6c 79 20 73 63 72 69 70 | 74 20 61 6e 64 20 63 6c |ly scrip|t and cl|
|000055b0| 6f 73 65 22 20 20 0a 3c | 2f 70 3e 0a 3c 70 3e 20 |ose" .<|/p>.<p> |
|000055c0| 20 20 20 63 6c 69 63 6b | 20 61 74 20 74 68 65 20 | click| at the |
|000055d0| 6c 6f 63 20 6f 66 20 62 | 74 6e 20 22 61 70 70 6c |loc of b|tn "appl|
|000055e0| 79 22 20 20 0a 3c 2f 70 | 3e 0a 3c 70 3e 20 20 20 |y" .</p|>.<p> |
|000055f0| 20 63 6c 6f 73 65 20 74 | 68 69 73 20 73 74 61 63 | close t|his stac|
|00005600| 6b 20 20 0a 3c 2f 70 3e | 0a 3c 70 3e 20 20 20 20 |k .</p>|.<p> |
|00005610| 62 72 65 61 6b 20 20 0a | 3c 2f 70 3e 0a 3c 70 3e |break .|</p>.<p>|
|00005620| 20 20 63 61 73 65 20 22 | 61 70 70 6c 79 20 73 63 | case "|apply sc|
|00005630| 72 69 70 74 20 61 6e 64 | 20 73 61 76 65 20 73 74 |ript and| save st|
|00005640| 61 63 6b 22 20 0a 3c 2f | 70 3e 0a 3c 70 3e 20 20 |ack" .</|p>.<p> |
|00005650| 20 20 63 6c 69 63 6b 20 | 61 74 20 74 68 65 20 6c | click |at the l|
|00005660| 6f 63 20 6f 66 20 62 74 | 6e 20 22 61 70 70 6c 79 |oc of bt|n "apply|
|00005670| 22 20 0a 3c 2f 70 3e 0a | 3c 70 3e 20 20 20 20 73 |" .</p>.|<p> s|
|00005680| 65 6e 64 20 22 6d 65 6e | 75 50 69 63 6b 22 20 26 |end "men|uPick" &|
|00005690| 61 6d 70 3b 26 61 6d 70 | 3b 20 71 75 6f 74 65 20 |amp;&amp|; quote |
|000056a0| 26 61 6d 70 3b 20 22 53 | 61 76 65 22 20 26 61 6d |&amp; "S|ave" &am|
|000056b0| 70 3b 20 71 75 6f 74 65 | 20 74 6f 20 62 74 6e 20 |p; quote| to btn |
|000056c0| 22 46 69 6c 65 22 20 6f | 66 20 73 74 61 63 6b 20 |"File" o|f stack |
|000056d0| 22 72 65 76 4d 65 6e 75 | 42 61 72 22 0a 3c 2f 70 |"revMenu|Bar".</p|
|000056e0| 3e 0a 3c 70 3e 20 20 20 | 20 62 72 65 61 6b 20 0a |>.<p> | break .|
|000056f0| 3c 2f 70 3e 0a 3c 70 3e | 20 20 65 6e 64 20 73 77 |</p>.<p>| end sw|
|00005700| 69 74 63 68 20 20 0a 3c | 2f 70 3e 0a 3c 70 3e 20 |itch .<|/p>.<p> |
|00005710| 20 65 78 69 74 20 74 6f | 20 74 6f 70 20 20 0a 3c | exit to| top .<|
|00005720| 2f 70 3e 0a 3c 70 3e 65 | 6e 64 20 6d 65 6e 75 50 |/p>.<p>e|nd menuP|
|00005730| 69 63 6b 20 0a 3c 2f 70 | 3e 09 00 00 00 00 00 08 |ick .</p|>.......|
|00005740| 00 00 03 f4 00 05 45 64 | 69 74 00 e0 c5 8a 55 19 |......Ed|it....U.|
|00005750| d9 6f 6e 20 6d 65 6e 75 | 50 69 63 6b 20 77 68 69 |.on menu|Pick whi|
|00005760| 63 68 20 20 0a 20 20 67 | 6c 6f 62 61 6c 20 67 52 |ch . g|lobal gR|
|00005770| 45 56 43 68 75 6e 6b 53 | 74 6f 72 65 2c 20 67 52 |EVChunkS|tore, gR|
|00005780| 45 56 54 6f 70 45 64 69 | 74 6f 72 2c 20 67 52 45 |EVTopEdi|tor, gRE|
|00005790| 56 43 6f 6d 6d 65 6e 74 | 43 68 61 72 61 63 74 65 |VComment|Characte|
|000057a0| 72 20 20 0a 20 20 73 65 | 74 20 74 68 65 20 64 65 |r . se|t the de|
|000057b0| 66 61 75 6c 74 53 74 61 | 63 6b 20 74 6f 20 67 52 |faultSta|ck to gR|
|000057c0| 45 56 54 6f 70 45 64 69 | 74 6f 72 20 20 0a 20 20 |EVTopEdi|tor . |
|000057d0| 73 77 69 74 63 68 20 77 | 68 69 63 68 20 20 0a 20 |switch w|hich . |
|000057e0| 20 63 61 73 65 20 22 50 | 61 73 74 65 20 41 73 20 | case "P|aste As |
|000057f0| 46 6f 72 6d 61 74 74 65 | 64 20 53 74 72 69 6e 67 |Formatte|d String|
|00005800| 22 20 20 0a 20 20 20 20 | 70 75 74 20 74 68 65 20 |" . |put the |
|00005810| 73 65 6c 65 63 74 65 64 | 43 68 75 6e 6b 20 69 6e |selected|Chunk in|
|00005820| 74 6f 20 74 53 65 6c 65 | 63 74 69 6f 6e 20 20 0a |to tSele|ction .|
|00005830| 20 20 20 20 73 65 74 20 | 74 68 65 20 64 65 66 61 | set |the defa|
|00005840| 75 6c 74 53 74 61 63 6b | 20 74 6f 20 28 74 68 65 |ultStack| to (the|
|00005850| 20 73 68 6f 72 74 20 6e | 61 6d 65 20 6f 66 20 74 | short n|ame of t|
|00005860| 68 69 73 20 73 74 61 63 | 6b 29 20 20 0a 20 20 20 |his stac|k) . |
|00005870| 20 73 65 6c 65 63 74 20 | 74 68 65 20 74 65 78 74 | select |the text|
|00005880| 20 6f 66 20 66 6c 64 20 | 22 68 69 64 64 65 6e 20 | of fld |"hidden |
|00005890| 74 65 78 74 20 63 6f 6e | 76 65 72 73 69 6f 6e 22 |text con|version"|
|000058a0| 20 20 0a 20 20 20 20 70 | 61 73 74 65 20 20 0a 20 | . p|aste . |
|000058b0| 20 20 20 70 75 74 20 66 | 6c 64 20 22 68 69 64 64 | put f|ld "hidd|
|000058c0| 65 6e 20 74 65 78 74 20 | 63 6f 6e 76 65 72 73 69 |en text |conversi|
|000058d0| 6f 6e 22 20 69 6e 74 6f | 20 74 53 74 72 69 6e 67 |on" into| tString|
|000058e0| 20 20 0a 20 20 20 20 72 | 65 70 6c 61 63 65 20 71 | . r|eplace q|
|000058f0| 75 6f 74 65 20 77 69 74 | 68 20 71 75 6f 74 65 20 |uote wit|h quote |
|00005900| 26 26 20 22 26 20 71 75 | 6f 74 65 20 26 22 20 26 |&& "& qu|ote &" &|
|00005910| 26 20 71 75 6f 74 65 20 | 69 6e 20 74 53 74 72 69 |& quote |in tStri|
|00005920| 6e 67 20 20 0a 20 20 20 | 20 72 65 70 6c 61 63 65 |ng . | replace|
|00005930| 20 63 72 20 77 69 74 68 | 20 71 75 6f 74 65 20 26 | cr with| quote &|
|00005940| 26 20 22 26 20 63 72 20 | 26 22 20 26 26 20 71 75 |& "& cr |&" && qu|
|00005950| 6f 74 65 20 74 53 74 72 | 69 6e 67 20 20 0a 20 20 |ote tStr|ing . |
|00005960| 20 20 69 66 20 63 68 61 | 72 20 31 20 6f 66 20 74 | if cha|r 1 of t|
|00005970| 53 74 72 69 6e 67 20 69 | 73 20 6e 6f 74 20 71 75 |String i|s not qu|
|00005980| 6f 74 65 20 74 68 65 6e | 20 70 75 74 20 71 75 6f |ote then| put quo|
|00005990| 74 65 20 62 65 66 6f 72 | 65 20 74 53 74 72 69 6e |te befor|e tStrin|
|000059a0| 67 20 20 0a 20 20 20 20 | 69 66 20 63 68 61 72 20 |g . |if char |
|000059b0| 2d 31 20 6f 66 20 74 53 | 74 72 69 6e 67 20 69 73 |-1 of tS|tring is|
|000059c0| 20 6e 6f 74 20 71 75 6f | 74 65 20 74 68 65 6e 20 | not quo|te then |
|000059d0| 70 75 74 20 71 75 6f 74 | 65 20 61 66 74 65 72 20 |put quot|e after |
|000059e0| 74 53 74 72 69 6e 67 20 | 20 0a 20 20 20 20 70 75 |tString | . pu|
|000059f0| 74 20 74 53 74 72 69 6e | 67 20 69 6e 74 6f 20 63 |t tStrin|g into c|
|00005a00| 68 61 72 20 28 77 6f 72 | 64 20 32 20 6f 66 20 74 |har (wor|d 2 of t|
|00005a10| 53 65 6c 65 63 74 69 6f | 6e 29 20 74 6f 20 28 77 |Selectio|n) to (w|
|00005a20| 6f 72 64 20 34 20 6f 66 | 20 74 53 65 6c 65 63 74 |ord 4 of| tSelect|
|00005a30| 69 6f 6e 29 20 6f 66 20 | 66 6c 64 20 22 73 63 72 |ion) of |fld "scr|
|00005a40| 69 70 74 22 20 20 0a 20 | 20 20 20 73 65 6c 65 63 |ipt" . | selec|
|00005a50| 74 20 61 66 74 65 72 20 | 63 68 61 72 20 28 74 68 |t after |char (th|
|00005a60| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 63 68 61 72 |e number| of char|
|00005a70| 73 20 69 6e 20 74 53 74 | 72 69 6e 67 29 20 2b 20 |s in tSt|ring) + |
|00005a80| 77 6f 72 64 20 34 20 6f | 66 20 74 53 65 6c 65 63 |word 4 o|f tSelec|
|00005a90| 74 69 6f 6e 20 6f 66 20 | 66 6c 64 20 22 73 63 72 |tion of |fld "scr|
|00005aa0| 69 70 74 22 20 20 0a 20 | 20 20 20 65 6e 61 62 6c |ipt" . | enabl|
|00005ab0| 65 20 62 74 6e 20 22 61 | 70 70 6c 79 22 20 20 0a |e btn "a|pply" .|
|00005ac0| 20 20 20 20 65 6e 61 62 | 6c 65 20 62 74 6e 20 22 | enab|le btn "|
|00005ad0| 52 65 76 65 72 74 22 20 | 20 0a 20 20 20 20 73 65 |Revert" | . se|
|00005ae0| 74 20 74 68 65 20 63 53 | 63 72 69 70 74 53 61 76 |t the cS|criptSav|
|00005af0| 65 64 20 6f 66 20 74 68 | 69 73 20 63 64 20 74 6f |ed of th|is cd to|
|00005b00| 20 66 61 6c 73 65 20 20 | 0a 20 20 20 20 62 72 65 | false |. bre|
|00005b10| 61 6b 20 20 0a 20 20 63 | 61 73 65 20 22 50 61 73 |ak . c|ase "Pas|
|00005b20| 74 65 20 41 73 20 43 6f | 6d 6d 65 6e 74 22 20 20 |te As Co|mment" |
|00005b30| 0a 20 20 20 20 70 75 74 | 20 74 68 65 20 73 65 6c |. put| the sel|
|00005b40| 65 63 74 65 64 43 68 75 | 6e 6b 20 69 6e 74 6f 20 |ectedChu|nk into |
|00005b50| 74 53 65 6c 65 63 74 69 | 6f 6e 20 20 0a 20 20 20 |tSelecti|on . |
|00005b60| 20 73 65 74 20 74 68 65 | 20 64 65 66 61 75 6c 74 | set the| default|
|00005b70| 53 74 61 63 6b 20 74 6f | 20 28 74 68 65 20 73 68 |Stack to| (the sh|
|00005b80| 6f 72 74 20 6e 61 6d 65 | 20 6f 66 20 74 68 69 73 |ort name| of this|
|00005b90| 20 73 74 61 63 6b 29 20 | 20 0a 20 20 20 20 73 65 | stack) | . se|
|00005ba0| 6c 65 63 74 20 74 68 65 | 20 74 65 78 74 20 6f 66 |lect the| text of|
|00005bb0| 20 66 6c 64 20 22 68 69 | 64 64 65 6e 20 74 65 78 | fld "hi|dden tex|
|00005bc0| 74 20 63 6f 6e 76 65 72 | 73 69 6f 6e 22 20 20 0a |t conver|sion" .|
|00005bd0| 20 20 20 20 70 61 73 74 | 65 20 20 0a 20 20 20 20 | past|e . |
|00005be0| 70 75 74 20 66 6c 64 20 | 22 68 69 64 64 65 6e 20 |put fld |"hidden |
|00005bf0| 74 65 78 74 20 63 6f 6e | 76 65 72 73 69 6f 6e 22 |text con|version"|
|00005c00| 20 69 6e 74 6f 20 74 53 | 74 72 69 6e 67 20 20 0a | into tS|tring .|
|00005c10| 20 20 20 20 72 65 70 6c | 61 63 65 20 63 72 20 77 | repl|ace cr w|
|00005c20| 69 74 68 20 28 63 72 20 | 26 20 67 52 45 56 43 6f |ith (cr |& gREVCo|
|00005c30| 6d 6d 65 6e 74 43 68 61 | 72 61 63 74 65 72 29 20 |mmentCha|racter) |
|00005c40| 69 6e 20 74 53 74 72 69 | 6e 67 20 20 0a 20 20 20 |in tStri|ng . |
|00005c50| 20 69 66 20 63 68 61 72 | 20 31 20 6f 66 20 67 52 | if char| 1 of gR|
|00005c60| 45 56 43 6f 6d 6d 65 6e | 74 43 68 61 72 61 63 74 |EVCommen|tCharact|
|00005c70| 65 72 20 69 73 20 6e 6f | 74 20 63 68 61 72 20 31 |er is no|t char 1|
|00005c80| 20 6f 66 20 74 53 74 72 | 69 6e 67 20 74 68 65 6e | of tStr|ing then|
|00005c90| 20 70 75 74 20 67 52 45 | 56 43 6f 6d 6d 65 6e 74 | put gRE|VComment|
|00005ca0| 43 68 61 72 61 63 74 65 | 72 20 62 65 66 6f 72 65 |Characte|r before|
|00005cb0| 20 74 53 74 72 69 6e 67 | 20 20 0a 20 20 20 20 70 | tString| . p|
|00005cc0| 75 74 20 74 53 74 72 69 | 6e 67 20 69 6e 74 6f 20 |ut tStri|ng into |
|00005cd0| 63 68 61 72 20 28 77 6f | 72 64 20 32 20 6f 66 20 |char (wo|rd 2 of |
|00005ce0| 74 53 65 6c 65 63 74 69 | 6f 6e 29 20 74 6f 20 28 |tSelecti|on) to (|
|00005cf0| 77 6f 72 64 20 34 20 6f | 66 20 74 53 65 6c 65 63 |word 4 o|f tSelec|
|00005d00| 74 69 6f 6e 29 20 6f 66 | 20 66 6c 64 20 22 73 63 |tion) of| fld "sc|
|00005d10| 72 69 70 74 22 20 20 0a | 20 20 20 20 73 65 6c 65 |ript" .| sele|
|00005d20| 63 74 20 61 66 74 65 72 | 20 63 68 61 72 20 28 74 |ct after| char (t|
|00005d30| 68 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 63 68 61 |he numbe|r of cha|
|00005d40| 72 73 20 69 6e 20 74 53 | 74 72 69 6e 67 29 20 2b |rs in tS|tring) +|
|00005d50| 20 77 6f 72 64 20 34 20 | 6f 66 20 74 53 65 6c 65 | word 4 |of tSele|
|00005d60| 63 74 69 6f 6e 20 6f 66 | 20 66 6c 64 20 22 73 63 |ction of| fld "sc|
|00005d70| 72 69 70 74 22 20 20 0a | 20 20 20 20 65 6e 61 62 |ript" .| enab|
|00005d80| 6c 65 20 62 74 6e 20 22 | 61 70 70 6c 79 22 20 20 |le btn "|apply" |
|00005d90| 0a 20 20 20 20 65 6e 61 | 62 6c 65 20 62 74 6e 20 |. ena|ble btn |
|00005da0| 22 52 65 76 65 72 74 22 | 20 20 0a 20 20 20 20 73 |"Revert"| . s|
|00005db0| 65 74 20 74 68 65 20 63 | 53 63 72 69 70 74 53 61 |et the c|ScriptSa|
|00005dc0| 76 65 64 20 6f 66 20 74 | 68 69 73 20 63 64 20 74 |ved of t|his cd t|
|00005dd0| 6f 20 66 61 6c 73 65 20 | 20 0a 20 20 20 20 62 72 |o false | . br|
|00005de0| 65 61 6b 20 20 0a 20 20 | 63 61 73 65 20 22 55 6e |eak . |case "Un|
|00005df0| 64 6f 22 20 20 0a 20 20 | 20 20 75 6e 64 6f 20 20 |do" . | undo |
|00005e00| 0a 20 20 20 20 62 72 65 | 61 6b 20 20 0a 20 20 63 |. bre|ak . c|
|00005e10| 61 73 65 20 22 43 75 74 | 20 4f 62 6a 65 63 74 28 |ase "Cut| Object(|
|00005e20| 73 29 22 20 20 0a 20 20 | 63 61 73 65 20 22 43 75 |s)" . |case "Cu|
|00005e30| 74 20 4f 62 6a 65 63 74 | 73 22 20 20 0a 20 20 63 |t Object|s" . c|
|00005e40| 61 73 65 20 22 43 75 74 | 22 20 20 0a 20 20 63 61 |ase "Cut|" . ca|
|00005e50| 73 65 20 22 43 75 74 20 | 54 65 78 74 22 20 20 0a |se "Cut |Text" .|
|00005e60| 20 20 20 20 69 66 20 74 | 68 65 20 73 65 6c 65 63 | if t|he selec|
|00005e70| 74 65 64 46 69 65 6c 64 | 20 69 73 20 6e 6f 74 20 |tedField| is not |
|00005e80| 65 6d 70 74 79 20 74 68 | 65 6e 20 69 66 20 74 68 |empty th|en if th|
|00005e90| 65 20 6c 6f 63 6b 54 65 | 78 74 20 6f 66 20 74 68 |e lockTe|xt of th|
|00005ea0| 65 20 73 65 6c 65 63 74 | 65 64 46 69 65 6c 64 20 |e select|edField |
|00005eb0| 74 68 65 6e 20 65 78 69 | 74 20 74 6f 20 4d 65 74 |then exi|t to Met|
|00005ec0| 61 43 61 72 64 20 20 0a | 20 20 20 20 69 66 20 72 |aCard .| if r|
|00005ed0| 65 76 43 68 65 63 6b 47 | 72 6f 75 70 44 65 6c 65 |evCheckG|roupDele|
|00005ee0| 74 65 28 29 20 74 68 65 | 6e 20 63 75 74 20 20 0a |te() the|n cut .|
|00005ef0| 20 20 20 20 72 65 76 55 | 70 64 61 74 65 50 61 6c | revU|pdatePal|
|00005f00| 65 74 74 65 20 20 0a 20 | 20 20 20 65 78 69 74 20 |ette . | exit |
|00005f10| 74 6f 20 74 6f 70 20 20 | 0a 20 20 20 20 62 72 65 |to top |. bre|
|00005f20| 61 6b 20 20 0a 20 20 63 | 61 73 65 20 22 43 6f 70 |ak . c|ase "Cop|
|00005f30| 79 20 4f 62 6a 65 63 74 | 73 22 20 20 0a 20 20 63 |y Object|s" . c|
|00005f40| 61 73 65 20 22 43 6f 70 | 79 20 4f 62 6a 65 63 74 |ase "Cop|y Object|
|00005f50| 28 73 29 22 20 20 0a 20 | 20 63 61 73 65 20 22 43 |(s)" . | case "C|
|00005f60| 6f 70 79 22 20 20 0a 20 | 20 63 61 73 65 20 22 43 |opy" . | case "C|
|00005f70| 6f 70 79 20 54 65 78 74 | 22 20 20 0a 20 20 20 20 |opy Text|" . |
|00005f80| 70 75 74 20 74 68 65 20 | 73 65 6c 65 63 74 65 64 |put the |selected|
|00005f90| 46 69 65 6c 64 20 69 6e | 74 6f 20 55 52 4c 20 22 |Field in|to URL "|
|00005fa0| 66 69 6c 65 3a 6f 75 74 | 70 75 74 31 22 20 20 0a |file:out|put1" .|
|00005fb0| 20 20 20 20 69 66 20 74 | 68 65 20 73 65 6c 65 63 | if t|he selec|
|00005fc0| 74 65 64 46 69 65 6c 64 | 20 69 73 20 6e 6f 74 20 |tedField| is not |
|00005fd0| 65 6d 70 74 79 20 74 68 | 65 6e 20 63 6f 70 79 20 |empty th|en copy |
|00005fe0| 20 0a 20 20 20 20 65 6c | 73 65 20 69 66 20 28 74 | . el|se if (t|
|00005ff0| 68 65 20 73 65 6c 4f 62 | 6a 29 20 69 73 20 6e 6f |he selOb|j) is no|
|00006000| 74 20 65 6d 70 74 79 20 | 74 68 65 6e 20 63 6f 70 |t empty |then cop|
|00006010| 79 20 20 0a 20 20 20 20 | 72 65 76 55 70 64 61 74 |y . |revUpdat|
|00006020| 65 50 61 6c 65 74 74 65 | 20 20 0a 20 20 20 20 65 |ePalette| . e|
|00006030| 78 69 74 20 74 6f 20 74 | 6f 70 20 20 0a 20 20 20 |xit to t|op . |
|00006040| 20 62 72 65 61 6b 20 20 | 0a 20 20 63 61 73 65 20 | break |. case |
|00006050| 22 50 61 73 74 65 22 20 | 20 0a 20 20 63 61 73 65 |"Paste" | . case|
|00006060| 20 22 50 61 73 74 65 20 | 4f 62 6a 65 63 74 28 73 | "Paste |Object(s|
|00006070| 29 22 20 20 0a 20 20 63 | 61 73 65 20 22 50 61 73 |)" . c|ase "Pas|
|00006080| 74 65 20 4f 62 6a 65 63 | 74 73 22 20 20 0a 20 20 |te Objec|ts" . |
|00006090| 63 61 73 65 20 22 50 61 | 73 74 65 20 54 65 78 74 |case "Pa|ste Text|
|000060a0| 22 20 20 0a 20 20 20 20 | 69 66 20 74 68 65 20 63 |" . |if the c|
|000060b0| 6c 69 70 42 6f 61 72 64 | 20 69 73 20 22 74 65 78 |lipBoard| is "tex|
|000060c0| 74 22 20 61 6e 64 20 28 | 74 68 65 20 73 65 6c 65 |t" and (|the sele|
|000060d0| 63 74 65 64 43 68 75 6e | 6b 29 20 69 73 20 65 6d |ctedChun|k) is em|
|000060e0| 70 74 79 20 61 6e 64 20 | 67 52 45 56 43 68 75 6e |pty and |gREVChun|
|000060f0| 6b 53 74 6f 72 65 20 69 | 73 20 6e 6f 74 20 65 6d |kStore i|s not em|
|00006100| 70 74 79 20 74 68 65 6e | 20 20 0a 20 20 20 20 20 |pty then| . |
|00006110| 20 74 72 79 20 20 0a 20 | 20 20 20 20 20 20 20 73 | try . | s|
|00006120| 65 6c 65 63 74 20 67 52 | 45 56 43 68 75 6e 6b 53 |elect gR|EVChunkS|
|00006130| 74 6f 72 65 20 20 0a 20 | 20 20 20 20 20 20 20 70 |tore . | p|
|00006140| 61 73 74 65 20 20 0a 20 | 20 20 20 20 20 20 20 65 |aste . | e|
|00006150| 6e 61 62 6c 65 20 62 74 | 6e 20 22 61 70 70 6c 79 |nable bt|n "apply|
|00006160| 22 20 20 0a 20 20 20 20 | 20 20 20 20 65 6e 61 62 |" . | enab|
|00006170| 6c 65 20 62 74 6e 20 22 | 52 65 76 65 72 74 22 20 |le btn "|Revert" |
|00006180| 20 0a 20 20 20 20 20 20 | 20 20 73 65 74 20 74 68 | . | set th|
|00006190| 65 20 63 53 63 72 69 70 | 74 53 61 76 65 64 20 6f |e cScrip|tSaved o|
|000061a0| 66 20 74 68 69 73 20 63 | 64 20 74 6f 20 66 61 6c |f this c|d to fal|
|000061b0| 73 65 20 20 0a 20 20 20 | 20 20 20 63 61 74 63 68 |se . | catch|
|000061c0| 20 73 6f 6d 65 45 72 72 | 6f 72 20 20 0a 20 20 20 | someErr|or . |
|000061d0| 20 20 20 20 20 62 65 65 | 70 20 20 0a 20 20 20 20 | bee|p . |
|000061e0| 20 20 65 6e 64 20 74 72 | 79 20 20 0a 20 20 20 20 | end tr|y . |
|000061f0| 20 20 65 78 69 74 20 6d | 65 6e 75 50 69 63 6b 20 | exit m|enuPick |
|00006200| 20 0a 20 20 20 20 65 6e | 64 20 69 66 20 20 0a 20 | . en|d if . |
|00006210| 20 20 20 6c 6f 63 6b 20 | 6d 65 73 73 61 67 65 73 | lock |messages|
|00006220| 20 20 0a 20 20 20 20 73 | 65 74 20 74 68 65 20 64 | . s|et the d|
|00006230| 65 66 61 75 6c 74 53 74 | 61 63 6b 20 74 6f 20 74 |efaultSt|ack to t|
|00006240| 68 65 20 74 6f 70 53 74 | 61 63 6b 20 20 0a 20 20 |he topSt|ack . |
|00006250| 20 20 70 61 73 74 65 20 | 20 0a 20 20 20 20 69 66 | paste | . if|
|00006260| 20 74 68 65 20 63 6c 69 | 70 42 6f 61 72 64 20 69 | the cli|pBoard i|
|00006270| 73 20 6e 6f 74 20 22 6f | 62 6a 65 63 74 73 22 20 |s not "o|bjects" |
|00006280| 74 68 65 6e 20 20 0a 20 | 20 20 20 20 20 73 65 74 |then . | set|
|00006290| 20 74 68 65 20 64 65 66 | 61 75 6c 74 53 74 61 63 | the def|aultStac|
|000062a0| 6b 20 74 6f 20 67 52 45 | 56 54 6f 70 45 64 69 74 |k to gRE|VTopEdit|
|000062b0| 6f 72 20 20 0a 20 20 20 | 20 20 20 65 6e 61 62 6c |or . | enabl|
|000062c0| 65 20 62 74 6e 20 22 61 | 70 70 6c 79 22 20 20 0a |e btn "a|pply" .|
|000062d0| 20 20 20 20 20 20 65 6e | 61 62 6c 65 20 62 74 6e | en|able btn|
|000062e0| 20 22 52 65 76 65 72 74 | 22 20 20 0a 20 20 20 20 | "Revert|" . |
|000062f0| 20 20 73 65 74 20 74 68 | 65 20 63 53 63 72 69 70 | set th|e cScrip|
|00006300| 74 53 61 76 65 64 20 6f | 66 20 74 68 69 73 20 63 |tSaved o|f this c|
|00006310| 64 20 74 6f 20 66 61 6c | 73 65 20 20 0a 20 20 20 |d to fal|se . |
|00006320| 20 65 6e 64 20 69 66 20 | 20 0a 20 20 20 20 75 6e | end if | . un|
|00006330| 6c 6f 63 6b 20 6d 65 73 | 73 61 67 65 73 20 20 0a |lock mes|sages .|
|00006340| 20 20 20 20 69 66 20 74 | 68 65 20 63 6c 69 70 42 | if t|he clipB|
|00006350| 6f 61 72 64 20 69 73 20 | 22 6f 62 6a 65 63 74 73 |oard is |"objects|
|00006360| 22 20 74 68 65 6e 20 73 | 65 6e 64 20 22 73 65 6c |" then s|end "sel|
|00006370| 65 63 74 65 64 4f 62 6a | 65 63 74 43 68 61 6e 67 |ectedObj|ectChang|
|00006380| 65 64 22 20 74 6f 20 62 | 74 6e 20 22 72 65 76 42 |ed" to b|tn "revB|
|00006390| 61 63 6b 53 63 72 69 70 | 74 22 20 6f 66 20 73 74 |ackScrip|t" of st|
|000063a0| 61 63 6b 20 22 72 65 76 | 4c 69 62 72 61 72 79 22 |ack "rev|Library"|
|000063b0| 20 20 0a 20 20 20 20 65 | 78 69 74 20 74 6f 20 74 | . e|xit to t|
|000063c0| 6f 70 20 20 0a 20 20 20 | 20 62 72 65 61 6b 20 20 |op . | break |
|000063d0| 0a 20 20 63 61 73 65 20 | 22 43 6c 65 61 72 20 4f |. case |"Clear O|
|000063e0| 62 6a 65 63 74 28 73 29 | 22 20 20 0a 20 20 63 61 |bject(s)|" . ca|
|000063f0| 73 65 20 22 43 6c 65 61 | 72 22 20 20 0a 20 20 63 |se "Clea|r" . c|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.